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KSIĄŻKA „C-64 KOD MA- 
SZYNOWY”, cena 30.000zł. 
Płatne przy odbiorze. Rafał 
Zimowski, Łódź, ul. Braty- 
sławska 14 m.11. 


Grupa ASTEC nawiąże kontakt 
z ambitinymi i zdolnymi 
programistami C-64. Robert 
Kuna, ul. Paderewskiego 3/12, 
63-102 ŚREM. 


Sprzedam dyski nagrane na 
AMIGĘ. Paweł Lewandowski, 
ul. Chałubińskiego 5c/5, 67-100 
NOWA SÓL. 


Wymienię się chętnie grami lub 
kupię je (C-64, magnetofon). 
Kubyszek Bartosz, ul. Tuwima 5/11, 


43-300 Bielsko Biała, tel. 454-62. l 
Wymienię programy na Amigę l 


500. Zbyszek Kułakowski, ul. 
Słowicz 4, 22-400 ZAMOŚĆ. 


SPRZEDAM: C-64, wszystkie 
peryferia, 150 dyskietek, 
literatura, etc. Komplet lub 
niektóre elementy. Tel. 
KRAKÓW 36-57-08. 


WYMIENIĘ PROGRAMY 
C-64 (KASETA). Michał Groth, 
ul. Pomorska 22A/20, 80-333 
Gdańsk. 


C-64--stacja 1541I1--magneto- 
fon; wymienię literaturę 

i oprogramowanie. Tomasz Za- 
rzycki, 59-255 Tomaszów Bol. 
130, woj. legnickie. 


TANIO SPRZEDAM AMIGĘ 
500 + OSPRZĘT + OPRO- 
GRAMOWANIE. Bielsko- 
Biała, tel. 438-49. 


Klub korespondencyjny THE 
BLOODY GREMLINS zacznie 
wymieniać oprogramowanie z 
AMIGOWCAMI Adres: The 
Bloody Gremlins - Wójcicki 
Kamil, ul. Nowogrodzka 60, 
95-200 Pabianice, tel. 15-02-60. 


POSZUKUJĘ PROGRAMÓW 
3D NA AMIGĘ. Tel. 520-335, 
ul. Kościuszki 112/4, Poznań. 





GRY I PROGRAMY NA C-64. 


KATALOG - DARMO. 
Noskowskiego 12/21, Jelenia 
Góra. 


I 

l 
Studlo Komputerowe l LLIULUUNLLLLLLLE” 
EROEIN [i COMMODORE 3 
oferuje wysyłkowo do | 5 - SERVICE : 
| COMMODORE 64/128 | E. Komputery C-16, C-64, 
programy (2000 pozycji), | s  C+4iAmiga500 3 
cartridge, z: naprawy odpłatne z 
literaturę, : i gwarancyjne. : 
instrukcje l: Firma "HOMECOMP" ISTNIEJE 3 
Napisz na adres: l ; SE DANE PCE = 
PROLAIN 2 02-620 W-WA, UL. PUŁAWSKA 102,5 
| |: TEL (0-22) 44-87-89, 5 
ul. Wyżynna 20/8 | z CZYNNY 11-19. z 
20-5€0 LUBLIN. 5 GWARANCJA. : 
Otrzymasz obszerny katalog. l : ZAPRASZAMY! s 
a 








KOMPUTEROWA FIRMA USŁUGOWA 

"IREND" - COMMODORE AMIGA: 
oprogramowanie, literatura. Infor- 
macja : dyskietka lub koperta + 
znaczek. Kontakt: Rafał Wierzbicki, 
ul. Rogowska 86/10, 54-440 
Wrocław. 


THE MANY AMI nawiąże kontakt z 
amigowcami. Kuba Kopczyk, Os. 
Wichrowe Wzg, 26/73, 61-697 Poznań. 


UWAGA!!! 
LISTOWNY KLUB KOMPUTEROWY 
"ROKET " ZRZESZAJĄCY 
UŻYTKOWNIKÓW KOMPUTERA 
COMMODORE  64/128, UDOSTĘPNIA- 
JĄCY OPROGRAMOWANIE PRAWIE 
ZA DARMO, WZNAWIA SWOJĄ 
DZIAŁALNOŚĆ. JEŚLI CHCESZ SIĘ 
DO NAS PRZYŁĄCZYĆ NAPISZ 
A ZOSTANĄ UDZIELONE CI 
WSZELKIE _ INFORMACJE. 


(KOPERTA + ZNACZEK ZWROTNY). 
|| | |] | JJ = 


L.K.K."ROKET", 
ul. Kilińskiego 23E/4, 
59-300 LUBLIN, 
woj. legnickie 


GRATIS! 








Klub Komputerowy Stodoła 
AMIGA 


e oferuje najlepsze stacje dysków 3,5 i 5,25" 
e serwis sprzętu firmy Commodore 
e literatura (także 64 plus 4) 
e akcesoria itp. 
Zapraszamy codziennie, oprócz sobót I niedziel 


w godzinach 117 - 2077 
Warszawa ul. Batorego 10 
tel. 25-60-31 wew. 35. 
Giełdy komputerowe w Stodole, sobota od 107" - 
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Wadliwa dystrybucja „ó4 plus 4 6 Amiga” przez przedsiębiorstwo 
RUCH jest przyczyną kłopotów, jakie mają czytelnicy chcący nabyć nasze 
pismo. Zdarza się, że otrzymujemy jako zwroty NIETKNIĘTE paczki 
zbiorcze. Tymczasem czytelnicy sygnalizują, że do wielu kiosków nie dociera 
ono wcale. Dlatego: 


zapraszamy wszystkich chętnych 
do prowadzenia kolportażu 
„64 plus 4 £ Amigg” 
(kluby, studia i sklepy komputerowe, księgarnie, 
osoby indywidualne itd.) 
do współpracy! 
Oferujemy korzystne warunki! 


Zainteresowanych prosimy o kontakt z działem dystrybucji pod 
adresem: Przedsiębiorstwo ABUK, 87-200 Wąbrzeźno, ul. 1 Maja 33. 


NOWOŚĆ! 
PUBLIC DOMAIN PACK 


dla COMMODORE 64 
NA KASECIE! 


Jeszcze w tym roku ukażą się cztery kasety! 

Na naszych zestawach znajdują się programy, które do tej pory 
ukazały się na dyskach PDP, oraz wiele nowości! 

Pojedyńcza kaseta kosztuje 30.000zł, wykupienie prenumeraty do 
końca roku (4 kasety) kosztuje tylko 11Otys zł. 

Wśród wszystkich, którzy zamówią komplet kaset (blankiet wpłaty 
zamieszczamy na str. 15) rozlosujemy 10 bezpłatnych prenumerat 
naszego pisma na rok 1992! Na błankiecie prosimy dopisać PDP- 
taśma. Spis treści pierwszego zestawu na str. 14. 








Przedsiębiorstwo ABUK S-ka z 0.0. oferuje państwu szybką 
i tanią obsługę reklamową. Ogłoszenia drobne od osób indy- 
widualnych (do 10 słów) przyjmujemy bezpłatnie. Większe - 
1000 zł za słowo. Reklamy ramkowe (minimalny format - 
20 cm 2: 1cm? ogłoszenia-4500zł, cała strona - 2,5 młn zł; kołor - odpo- 
wiednio 100% drożej. 

Ogłoszenia przyjmujemy za pośrednictwem poczty (nasz adres - patrz 
stopka redakcyjna). Treść ogłoszenia z określeniem formatu reklamy 
(ewentualnie zamówieniem kołoru) prosimy nadsyłać listem poleconym 
wraz z odcinkiem wpłaty (za pomocą przekazu pieniężnego) na konto 
Przedsiębiorstwa ABUK Bank Polska Kasa Opieki SA Oddział w Bydgosz- 
czy, konto nr : 5.09011-400522.7-136-11-111.0 Dołączenie do zamówienia 
odcinka wpłaty przyspieszy zamieszczenie reklamy . 














OD REDAKCJI 


OD REDAKCJI 


W numerze : 


Ogłoszenia 

Od redakcji 

Z daleka i z bliska 
Uczymy slę grać 


Słów parę o tym, jak gra 
twój komodorek 


Jak zrobić demo (C-64) . .8 


Kosmos w jednym 
duszku 


Podręczny DOS ....... 12 
Sztuczki i kruczki 

Reklama 

Sculpt 4D (menu Tools 


Własne demo - Amiga - 
sprites (cz. 4) 

Kącik początkującego 
kodera 

Flle Requeste czyli 


o wybieraczkach 
słów kilka 


Spls PDP 





W następnym 
numerze: 


e Przedstawimy 
mini skaner do 
C-64 


e AMIGA 
- język C 
eCheats na 


C-64 
i Amigę 
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NOWINKI 





Termomagnetyczne dyski opty- 
czne robią ostatnio furorę 
wśród użytkowników kompute- 
rów. 

Zasada działania tych dysków 
jest prosta: zapis następuje 
poprzez podgrzanie warstwy 
nośnika promieniem lasera do 
temperatury ok. 400 stopni C, 
temperatura ta powoduje „ba- 
łagan*w dipolach magnety- 
cznych nośnika. Podgrzany 
obszar stygnie w jednorodnym 
polu magnetycznym, przyjmu- 
jąc jego polaryzację. Odczyt na- 
stępuje analogicznie, jak w 
popularnych urządzeniach CD. 
Wiadomości te, przydadzą się 
podczas lektury poniższego te- 
kstu, opisującego dwa typy dys- 
ków optycznych do Amigi: 
Ricoh Opticał OD-600 i Sony 
Optical SM-S5U1-1 1. 

Oba wymienione urządzenia są 
ze sobą kompatybilne, tj. dyski 
zapisane na jednym z nich dają 
się bez problemu odczytywać na 
drugim. Dyski te są dostarczane 
z dyskietkami (?) o pojemności 
około 600 MB. Cena takiej dys- 
kietki wynosi około 200 marek i 
daje w przeliczeniu koszt 
ok.0.33 marki za jeden me- 
gabajt pamięci. Cena stacji 
Ricoh wynosi (wraz z dyskietką) 
ok. 9000 marek, Sony (też z 
dyskietką) ok. 6500. Poniżej 
znajdują sie parametry tech- 
niczne tych stacji w porównaniu 
do zainstalowanego w A3000 
standardowego dysku twardego 
Quantum 105LPS. 

Oto one: 


Ricoh Sony Quantum 


Create (Files/s) 124 192 192 
Open/Close (Filesjs) 32 58 192 


Scan (Files/s) 34 60 305 
Delete (Files/s) 308 632 578 
Seek/Read 667 752 942 


Create (KBytejs) 89 192 656 


4 


Write (KByte/s) 
Read (KByte/s) 


117 262 921 

358 401 910 

2 parametrów i ceny należałoby 
polecać napęd Sony. Na za- 
kończenie mała dygresja: licząc 
cenę stacji i jednej dyskietki 
otrzymujemy cenę jednego me- 
gabajta nastepującą: Ricoh - 15 
marek, Sony 10.8 marek. Mogę 
tylko dodać, że MacWorid 8/01 
reklamuje kasowalny dysk opty- 
czny o pojemności. 6.5 giga- 
bajtów z twardym dyskiem w 
charakterze bufora w cenie 
10.000 dolarów, co daje koszt '1 
MB na poziomie... 2.6 marki. 


Nowy emułator Atari ST 
nazywa się Chamaleon II i ofe- 
rowany jest z oryginalnym 
Atari-Tos-Romem. Karty 
68020/030, o ilesą, mogą działać 
pod TOŚSem 1.0, 1.2 i 1.4. 
Wszystkie rczdzielczości ST są 
osiągalne, a software'owy flick- 
er-fixer (teoretycznie) zmniej- 
sza dokuczliwość interlace'u. 
Chętni mają możliwość emula- 
cji do ośmiu ST. Poza tym mamy 
możliwość zapisu i odczytu dys- 
ków w formacie ST, korzystania 
zamigoskich dysków twardych i 
botowania (niech ktoś wymyśli 
jakieś rozsądne słowo zamiast 
„boot”) bezpośrednio z partycji 
ST. 


Firma California Access 
oferuje do A2000 kontroler 
SCSI Malibu Board w cenie ok. 
400 marek. Napęd może być 
zainstałowany na płycie kontro- 
lera. Oprócz tego jest tam miej- 
sce na 8 MB RAMu (moduły 
SIMM). Kontroler zapewnia 
16-bitową transmisję danych 
przy szybkości (z napędem 
Quantum) około 700 KB/s. Od 
wersji Kikstarta 1.3 kontroler 
pozwala na autoboot. 


Ciekawostka: niemiecka firma 
Christian Obermaier wykonuje 


specyficzny typ usług: mozolnie 
policzone, lub narysowane 
obrazki z Amigi można prze- 
nieść na zwykły papier foto- 
graficzny, lub diapozytyw. 
Grafiki mogą mieć rozdziel- 
czość do 4000 na 4000 pikseli w 
formacie 24-bitowym. Zdjęcia 
mogą być formatu 24 na 36 mm, 
lub 18 na 24 cm. Cena naświe- 
tlenia jednego przezrocza 24 na 
36 mm wynosi 30 marek. 


Czasopismo AMIGA ogłosiło 
konkurs, w którym nagrodą jest 
aparat fotograficzny Canon 
RC-260 pozwałający na zapis do 
50 zdjęć na dyskietce o wy- 
miarze 2 cali. Konkurs polega 
na tym, że należy przesłać wła- 
sną grafikę na adres redakcji. 
Grafika ta, o ile będzie na odpo- 
wiednim poziomie, zostanie 
zamieszczona na pierwszej stro- 
nie okładki czasopisma. 

A zatem - do dzieła! 

Narynku pojawiło sie wiele kart 
graficznych likwidujących nie- 
szczęsny amigowy interiace. 
Aby uławtić klientom zakup 
AMIGA 5$/91 podaje testy po- 
szczególnych typów kart. Oto 
wyniki testu (wskałi od Odo 12): 


A2320 9.4 
De-Interlace-Card 9.3 
Highgraph V 9.1 
FlickerFixer 7.9 


X-tiension Pro Video 9.0 


Warto może dodać, że z reguły 
karty te oprócz usunięcia 
interłace'u dają możliwość 





Geje) FLUEJ 


pracy w trybie SuperHiRes. 
Jarosław _ Chrostowski 
9/91 








C-16 





Uczymy się grać 





W poprzednim artykule przedstawiliśmy Wam prosty 
program narzędziowy, ułatwiający komponowanie wła- 
snych melodii, lub przenoszenie ich z partytur. 

W dzisiejszym spotkaniu z muzyką dła C-16 i Plus 4 
prezentujemy kolejny program tego typu, pozwalający 
tworzyć melodie w sposób mniej kłopotliwy. Będziecie 
poprostu grać na klawiaturze komputera, a w okienku 
uzyskacie nazwę nuty i wartość dźwięku. 

Zanotowany przez Was na kartce ciąg tak uzyskanych 
wartości nut można utrwalić, przenosząc je do poprzed- 
niego programu narzędziowego. Zwracamy przy tym 
uwagę, że program dzisiejszy odwzorowuje tylko pierw- 
szą połowę możliwości dźwiękowych C 16 i Plus 4. 

Dla lepszego poznania swojego komputera, na pod- 
stawie prezentowanego programu, oraz artykułu (patrz 
tabela) opublikowanego w naszym pierwszym numerze 
(listopad 1990r), możecie pokusić się o napisanie prog- 
ramu dla drugiej połowy skali dźwięków, lub uzupełnić 
odpowiednio nasz program. Sądzimy, że będzie to dobre 
ćwiczenie. Program wpisujemy do komputera i nagry- 
wamy go na taśmę, lub dyskietkę znanymi komendami. 

- SAVE "GRAJACY COMMODORE, 1 - taśma 
- SAVE "GRAJACY COMMODORE: 8 - dyskietka 

Dla lepszej czytelności programu wprowadziliśmy 
następujące oznaczenia; 

- góra, dół, łewo, prawo - nałeży wcisnąć odpowiedni 
klawisz kursora po uprzednim wpisaniu cudzysłowu. 

- SPC - spacja, 2SPC - dwie spacje itd. 

- SU,S*,S-, - przy wciśniętym klawiszu SHIFT należy 
wcisnąć klawisz z odpowiednią literą, lub znakiem 
semigraficznym, 2SU - dwukrotnie nałeży wcisnąć odpo- 
wiednią literę itd. 

-CCCAitd. - jakwyżej, lecz zamiast klawisza SHIFT, 
wciskamy klawisz COMMODORE. 

- nie piszemy przecinków występujących w tekście 
tytułu. 

Program zajmuje 16243 bity i jest przeznaczony dła 
C116iC 16 z pamięcią RAM 64 KB. 


10  SCNCLR:GOSUB 1590:REM - TYTUL - 

20 GRAPHIC 1,1 

30 REM 

40 REM - PLANSZA - 

50 REM 

60 BOX 1.0,0,319,199 

70 CHAR 1,9,1,"GRAJACY 
C=16" 

80 CHAR 1,13,2” * 

90 CHAR 1,15,3,"DZWIEK (2SPC) CZAS" 

100 CHAR 1,14,5,  "SU,7S*,CR,4S*,SJ,”,1 

110 CHAR 1,14,6,'S-,7SPC,S-,4SPC,S-",1 

120 CHAR 1,14,7,'S-,7SPC,S-,4SPC,S-",1 

130 CHAR 1,14,8,'8J,7S*,CE,4S*,SK”,1 

140 REM 

150 REM - KLAWIATURA - 

160 REM 

170  DRAW1,12,80T0316,80:DRAW 


(2SPC) COMMODORE 


1.12,130T0316,130 


KJ : 
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180 


190 


210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 


340 
350 


370 


400 
410 


610 


620 


640 


650 


670 


700 


710 
720 


FORI=12TO316STEP16:DRAWI I,81TOI,130: 
NEXTI 
BOX1,23,81,33,106,,1:BOX1,55,81,65,106,,1:BOX 
1,71,81,81,106,,1 
FORI=113T0146STEP16:BOXI 1,81, (18)2,106,,1: 
NEXTI 

FORI=177TO193STEP16:BOX1 l,81,(I-8)-2,106,,1: 
NEXTI 

FORI=225T0257STEP16:BOX1 l,81,(1-8)-2,106,,1: 
NEXTI 

FORI=289TO308STEP16:BOX1 l,81,(l-8)-2,106,,1: 
NEXTI 

CHAR 1,03,11,"2" 

CHAR 1,07,11,'4” 

CHAR 1,09,11,'5” 

CHAR 1,13,11,”7" 

CHAR 1,15,11,"8" 

CHAR 1,17,11,"9" 

CHAR 1,21,11,"A" 

CHAR 1,23,11,"S" 

CHAR 1,27,11,"F" 

CHAR 1,29,11,”G” 

CHAR 1,31,11,"H" 

CHAR 1,35,11,"K” 

CHAR 1,37,11,"L" 

CHAR 1,02,15,"Q" 

CHAR 1,04,15,"W” 

CHAR 1,06,15,"E" 

CHAR 1,08,15,"R" 

CHAR 1,10,15,"T" 

CHAR 1,12,15,"Y" 

CHAR 1,14,15,”U" 

CHAR 1,16,15,"T' 

CHAR 1,18,15,"O0” 

CHAR 1,20,15,”P" 

CHAR 1,22,15,"Z" 

CHAR 1,24,15,"X" 

CHAR 1,26,15,"C” 

CHAR 1,28,15,"V" 

CHAR 1,30,15,"B" 

CHAR 1,32,15,"N" 

CHAR 1,34,15,"M" 

CHAR 1,36,15,",” 

CHAR 1,36,15,"." 

CHAR 1,36,14,"<170 

CHAR1,38,14,">" 

REM 

REM - OPIS - 

REM 

CHAR 1,1,17,"CZAS TRWANIA DZWIEKU USTA 
LASZ KURSOREM” 

CHAR 1,18,19,"<197 -*,1 


CHAR 1,1,21,"KLAWISZEM "RETURN- START 


GRANIA.” 

CHAR 1,1,22,"SPACJA-POWROT DO CZASU 
BRZMIENIA.” 

CHAR 1,1,23,"ESC - KONIEC." 

REM 


REM - USTALANIE CZASU BRZMIENIA - 

REM 

GETY$ 

T=PEEK (336) 

CHAR1,23,6,STR$ _ (T)+"2SPC"„1 
IFY$=CHR$ (29)AND PEEK(336)<THEN POKE 
336, PEEK(336)+1 





C-16 
730 


740 
750 
760 
770 
780 
790 
800 
810 
820 
830 
840 
850 
860 
870 
880 
890 
900 
910 
920 
930 
940 
950 
960 
970 
980 
990 
1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1510 
1320 
1330 
1340 
1350 
1360 


IFY$=CHR$ (157) ANDPEEK  (336)0THENPOKE 1370 
336,PEEK _(336)-1 1380 
IFY$=CHR$ (13) THEN 760 1390 
GOTO690 1400 
REM 1410 
REM - WARTOSCI NUT - GRANIE - 

REM 1420 
GETKEYY$:VOL8 1430 
IFY$=CHR$ (27) THENGOSUB 1550:GOTO1560 

IFY$="1" THENGOSUB 1550 1440 
IFY$="3” THENGOSUB 1550 1450 
IFY$="6" THENGOSUB 1550 

IFY$="0" THENGOSUB 1550 1460 
IFY$="LEWO" THENGOSUB 1550 1470 
IFY$="PRAWO" THENGOSUB 1550 1480 
IFY$="GORA" THENGOSUB 1550 1490 
IFY$="DOL" THENGOSUB 1550 1500 
IFY$=CHR$ (20) THENGOSUB 1550 

IFYS="e" THENGOSUB 1550 1510 
IFY$="+" THENGOSUB 1550 

IFY$="-" THENGOSUB 1550 1520 
IFY$="DOM" THENGOSUB 1550 

IFY$="D" THENGOSUB 1550 1540 
IFY$="J" THENGOSUB 1550 1550 
IFY$=":* THENGOSUB 1550 

IFY$=":* THENGOSUB 1550 1560 
IFY$="*" THENGOSUB 1550 1570 
IFYS=CHR$ (13) THENGOSUB 1550 1580 


IFY$="/" THENGOSUB 1550 
IFY$="8" THENGOSUB 1550 
IFY$="=" THENGOSUB 1550 
IFY$="Q" THENC=7:GOSUB 1380 
IFY$="2" THENC=64:GOSUB 1380 
IFYS="W" THENC=118:GOSUB 1380 
IFY$="E" THENC=169:GOSUB 1380 
IFY$="4" THENC=217:GOSUB 1380 
IFY$="R" THENC=262:GOSUB 1380 
IFY$="S" THENC=305:GOSUB 1380 
IFY$="T" THENC=345:GOSUB 1380 
IFY$="Y" THENC=383:GOSUB 1380 
IFY$="7" THENC=419:GOSUB 1380 
IFY$="U" THENC=453:GOSUB 1380 
IFY$="8" THENC=485:GOSUB 1380 
IFY$="I" THENC=516:GOSUB 1380 
IFY$="9" THENC=544:GOSUB 1380 
IFY$="O" THENC=571:GOSUB 1380 
IFY$="P" THENC=596:GOSUB 1380 
IFY$="A" THENC=620:GOSUB 1380 
IFY$="Ż" THENC=643:GOSUB 1380 
IFY$="S" THENC=664:GOSUB 1380 
IFY$="X" THENC=685:GOSUB 1380 
Iry$="C" THENC=704:GOSUB 1380 
IFY$="F" THENC=722:GOSUB 1380 
IFY$="V" THENC=739:GOSUB 1380 
IFY$="G" THENC=755:GOSUB 1380 
IFY$="B" THENC=770:GOSUB 1380 
IFY$="H" THENC=784:GOSUB 1380 
IFY$="N" THENC=798:GOSUB 1380 
IFY$="M" THENC=810:.GOSUB 1380 
IFY$="K" THENC=822:GOSUB 1380 
IFY$="," THENC=834:GOSUB 1380 
IFY$="L" THENC=844:GOSUB 1380 
IFY$=".” THENC=854:GOSUB 1380 
IFY$=" " THEN690 

SOUND1,C,T 


1590 
1600 


1610 


1620 


1630 


1640 


1650 


1660 


1670 


1680 


1690 


1700 


1710 


1720 


GOTO790 

REM 

REM - NUTY I CZAS - PISANIE - 

REM 
IFC=1690RC=596ORC=810THENZ$="(2SPC)C 
(4SPC)" 
IFC=217ORC=6200RC=822THENZ$="CIS,DES" 
IFC=2620RC=6430RC=834THENZ$="(2SPC)D 
(48PC)" 
IFC=3050RC=664ORC=844THENZ$="DIS,ES" 
IFC=3450RC=6850RC=854THENZ$="(28PC)E 
(48PC)" 
IFC=3830RC=704THENZ$="(2SPC)F(48PC)" 
IFC=4190RC=722THENZ$="FIS,GES" 
IFC=4530RC=739THENZ$="(2S8PC)G(4SPC)" 
IFC=4850RC=755THENZ$="GIS,AS" 
IFC=7ORC=516ORC=770THENZ$="(2SPC)A 
(48PC)" 
IFC=640RC=5440RC=784THENZ$="AIS,B 
(2SPO)" 
IFC=1180RC=571ORC=798THENZ$="(2SPC)H 
(48PC)"1530 CHAR1,16,6,8TR$(C)+"2SPC",1 
CHAR1,15,7,2$,1:RETURN 

VOLO:C=0:CHARI ,16,6,"28PC",1:CHAR1,15,7,"7 
SPC",1:RETURN 
GRAPHICO:SCNCLR:PRINT"1ODOL,22SPC,," 
PRINT"1OPRAWO,DZIEKUJE -  CZESC(2SPOJIII" 
PRINT"13PRAWO'38PC":END 
PRINT"5DOL":A$="5PRAWO" 
PRITA$„SU,S*,SI,CA,S*,SI,SU,S*,SI,SU,S*,CS, 
SU,S*,SI,SU,S*,SI,CR,SPC,CR" 
PRINTA$'S-,2SPC,S-,SPC,S-,S-,SPC,S-,2SPC,S- 
,S-,SPC,S-,S-,25PC,S-,SPC,S-” 
PRITA$"S,SPC,C$,CQ,S*,SK,CQ,S*,CW,2SPC,S- 
,CQ,S*,CW,S-,28PC,SJ,CR,SK" 
PRINTA$"S-,SPC,$-,$-„SPC,S-,SPC,S-,2SPC,S- 
„S-.SPC,S-,S-,38PC,S-" 
PRINTA$"SJ,S*,SK,CE,SPC„CE,SPC,CE,2SPC, 
S-,CE,SPC,„SJ,S*,SK,SPC,CE,SPC" 
PRINTA$"11SPC,S-" 

PRINTA$"10SPC,SJ,SK" 
PRITA$"SU,S*,SI,SU,S*,SI,SU,SI,SU,SI,SU,SI,SU, 
SI,SU,S*,SI,CA,S*,SI,SU,S*,SI,CA,S*,SI,CA,S*,CS" 
PRINTA$"S-,2SPC,$-,SPC,108-,SPC,2$-,SPC,2S- 
,SPC,28-,SPC,2S-,28PC" 
PRINTA$"S-.2$PC,S,SPC,2$,SJ,SK,28,SJ,SK,28- 
„SPC,28-,SPC,2S-,SPC,28-,CQ,S*,SK,CQ,CW,SPC" 
PRINTA$”S-.2SPC,$-,SPC,28,2SPC.28,2SPC,28- 
,SPC,28-,SPC,2S-,SPC,2S-„SPC,S-,25PC,CD,CF" 
PRITA$"SJ,S*,SK,SJ,S*,SK,CE,2SPC,2CE,2SPC, 
CE,SJ,S*,SK,CZ,S*,SK,SJ,S*,SK,CE,SPC,„CZ,S*, 
CX,CC,CV* 

FORT=1TO5000:NEXTT:RETURN 


Jan  Sledlecki 
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Idę o zakład, że bardzo niewielu użytkowników Com- 
modore 04 zastanawia się nad tym, jak to właściwie jest, 
że ich poczciwy komputer potrafi tak ładnie grać. 

Jeżeli posiadacie lub macie dostęp do starych progra- 
mow (np. gry z roku 1985/86) to zwróćcie uwagę nie na 
melodię, a na używane dźwięki. Wraz z ewoluowaniem 
procedur grających znacznie poprawiała się jakość dźwię- 
ku. 

Układ dźwiękowy, który zamontowano w C-64 jest 
prostym syniezatorem, który bez specjalnej pomocy nie 
potrafi z siebie wydobyć bardzo skomplikowanych 
brzmień. „Wobec tego, skąd biorą się dźwięki perkusji, 
basu iip.?” - możecie spytać. Odpowiedź jest prosta, 
wszystko to zależy od jakości procedury grającej. 

Ogólnie można założyć, że w momencie wywołania 
samego „grajka”, procesor wykonuje skok do czierech 
podprogramów - 3 procedur obsługujących zapis linii 
melodycznej (w dużym uproszczeniu) i procedury, która 
zajmuje się syntezą dźwięku. W przypadku wymienio- 
nych 3 procedur „odczytu muzyki” ich opis można ogra- 
niczyć do stwierdzenia, że każda odpowiada jednemu 
generatorowi, zajmuje się odczytem kolejnej nuty, usta- 
leniem jej długości trwania i wysokości dźwięku, Oraz 
pobraniem danych dotyczących sterowania syntezą 
dźwięku. Z reguły procedury obsługujące pracę genera- 
torów pracują i przetwarzają dane niezależnie od siebie. 

Jednak z punktu widzenia odbiorcy, ważne jest to co 
słyszy, a nie to, co się tam w środku komputera „micli” 
i do tego służy czwarty podprogram odpowiedzialny za 
syntezę. Jego główne zadanie polega na tym, by nie tylko 
wpisywać do SID-a dane dotyczące wysokości poszcze- 
gólnych dźwięków, kształtu fali itp., ale również mody- 
fikować parametry podczas trwania dźwięku, co pozwala 
na „wyciśnięcie” z SID-a o wiele więcej, niż to wynika 
zjego opisanych możliwości. Jest to bardzo ważna cecha 
procedur muzycznych napisanych w kodzie maszyno- 
wym, żadne procedury grające napisane w języku 
BASIC nigdy nie sprostają wymogom prędkości. 

Jak więc można wykorzystać potencjalne możliwości 
drzemiące w zastosowaniu resyntezy przy okazji każde- 
go wywołania muzyki? Najprościej przedstawić to 
można na przykładzie makroinstrukcji zastosowanych 
w edytorze muzycznym VOICETRACKER. 

Zastanówmy się, jak syntetyzuje się np. dźwięk per- 
kusji.Aby tego dokonać należy, operować kilkoma 
kształtami fal dźwiękowych (zmienianych co każde 
wywołanie „grajka”), co schematycznie może wyglądać 
np. w ten Sposób: 

1. zaczynamy szumem ($80) 

2. tala prostokątna ($40) 

3. fala prostokątna ($40) 

4. ikończymy ponownie szumem ($40) 
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Jest tlo oczywiście schemat, a w przypadku VOICE- 
TRACKER'a rozwiązano to w ten sposób, że każdemu 
opisowi kształtu fali towarzyszy odpowiadający jej para- 
metr wysokości dźwięku, oraz parametr sterowania filt- 
rami. W zapisie wygląda to np. w ten sposób: 

00: 81 c5 00 

01: 41 a8 00 

02: 41 a4 00 

03: fe 00 00 

..0o należy zinterpretować następująco: 

00. dźwięk: szum; wysokość: c5; filtr: QQ (nic) 

0ł. dźwięk: prostokąt; wysokość: a8; filtr: OO 

02. dźwięk: prostokąt; wysokość: a4; filtr: 00 

03. wartość $fe-czyli zakończenie makroinstrukcji 
(ostatnie parametry są wykonywane aż do wygaśnięcia 
dźwięku). 

Makroinstrukcje mają to do siebie, że poszukiwane 
dźwięki uzyskuje się poprzez dość żmudne próbowanie 
różnych wartości parametrów, co po jakimś czasie za0- 
wocuje dobrym, oryginalnym brzmieniem. W tym kon- 
kretnym przypadku, makroinstrukcja została zakończona 
wartością $fe w miejscu, które zwykle oznacza kształt 
tali. 

Warto wiedzieć, że gdy umieścimy w tym miejscu war- 
tość $ff, to spowoduje to wykonywanie tej makroin- 
strukcji ponownie od pozycji oznaczonej zerem (czyli od 
początku). Jest to bardzo przydatne np. w przypadku 
symulowania trójdźwięków przy pomocy jednego gene- 
ratora, co odbywa Się np. w następujący sposób: 


00: 41 00 00 
Oi: 41 07 00 
02: 41 Oc 00 
03: ff 00 GO 


Drugi parametr, który oznacza wysokość dźwięku 
działa w ten sposób, że o ile jego wartość jest mniejsza 
od $80, to oznacza ilość dodanych półtonów do wysoko- 
ści dźwięku, określonej przez zapis w patternie, 
a w sytuacji, gdy wartość jest większa lub równa $80, to 
grany jest dźwięk w/g wzoru: 
grany dźwięk=C-O (najniższy dźwięk) + (parametr-$80) 

Rozwiązanie takie, pozwala utrzymywać stałe wyso- 
kości dźwięków, pomimo ewentualnych transpozycji 
całych patiernów w zapisie dla któregoś z generatorów, 
co jest bardzo ważne np. przy imitowaniu dźwięku per- 
kusji itp. 


Paweł  Sołtysiński 
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Skoro już jesteśmy w posiadaniu prawidłowo zdefinio- 
wanego kompletu znaków (patrz poprzedni odcinek na- 
szego cyklu), możemy przystąpić do napisania procedury 
samego scroll'a, który będzie przewijał tekst w dwóch gór- 
nych liniach ekranu. 

Na początek założenia: procedura ma umożliwiać 
zmianę prędkości przewijania tekstu oraz opcję pauzy 
(tzn. chwilowego zatrzymania przewijania). Poniżej 
podano, jak zwykle tekst źródłowy programu napisane- 
go w Turbo Asseinblerze. 


*—= $6000 przykładowy adres startu 
SCROLL =$D016 
RASTER =$D012 
HIRASTER  =$DO011 
RASTERSET =$DO1A 
RASTCONF  =$D019 
CHARBANK =$D018 
IRQEXIT =$EA31 
VECT =$FB imłodszy bajt wektora dla tekstu 
SCRL =$FD 
;IRQ - start (ustawienie parametrów) 
SE! 
LDA 4$7F 
STA $DCOD 
LDX 4500 
STX $DCOE 
INX 
STX  RASTERSET 
LDA 4$1B 
STA HIRASTER 
LDA +$32 
STA RASTER 
LDA 4$18 iustawienie nowego ge- 


;neratora znaków 
STA CHARBANK ,pod adresem $2000 


LDA £<IRQ 


LDX IRQ 
STA $0314 
STX $0315 
JSR TEXTSET 
CLI 

RTS 


;IRQ - procedura obsługi przerwań 
IRQ LDA SCRL 
STA SCROLL 
LDA +$42 
CMP RASTER 
BNE LOOP1 
LDA 4$C8 
STA SCROLL 
JSR  SCRDRIVER 
INC  RASTCONF 
JMP  IRQEXIT 
;SCROLL - procedura właściwa 
SCRDRIVER LDA 4500 ;test pauzy (zero-nie ma) 


LOOP1 


8 





LOOP2 


SPD 


LOOP3 


LOOP4 


HALF 


ZNAK 


HOPS 


LOOP5 


LOOP6 


LOOP7 


BEQ 
DEC 


RTS 
LDA 
SEC 
SBC 
STA 
AND 
BNE 


LDA 
CLC 
ADC 
STA 
LDX 


LDA 


STA 
INX 
CPX 


BNE 
LDA 


BEQ 


LDA 
CLC 
ADC 
STA 


CLC 
ADC 
STA 
DEC 
RTS 
LDY 
LDA 


BNE 


JSR 
JMP 
CMP 
BNE 
LDA 
STA 
JSR 


RTS 
CMP 
BCC 
AND 
STA 


JSR 


JMP 


LOOP2 


SCRDRIVER+1 ;jest pauza-zmniejsz 


SCRL 
4801 
SCRL 
4$08 
LOOPS3 
SCRL 
4$08 
SCRL 
4:$00 
$0401,X 
$0400,X 
4$4F 


LOOP4 
H$00 


LOOPS 
4$00 


4540 
$0427 


4$80 
$044F 
HALF+1 


4800 
(VECT),Y 


LOOP6 


TEXTSET1 
LOOP5 
H$50 
LOOP7 
4$80 


SCRDRIVER+1 


VECTINCR 


4$40 
LOOP8 
4807 
SPD+1 


VECTINCR 


LOOPS5 


;o jeden 


01-prędkość pierwsza 


„przesunięto cały znak? 
;RTS, jeśli nie przesunięto 
;:znaku 


„przesunięcie dwóch  linil 
ekranowych 

;o cały znak w lewą stro- 
mę 


„przesunięto wszystkie 
;linie? 

;jeśli nie, to ldź do LOOP4 
która połowa dużego 
;znaku? 

;zero - plerwsza połowa 
inowego znaku 


„wstaw znak do pierwszej 
linii 


„wstaw znak do drugiej linii 


„odczytanie kolejnej litery 
;tekstu 
„dź do LOOP©, jeśli nie 
;koniec 


„jeśll litera „P”, to pauza 
;jeśli nie, to idź do LOOP7 


;ustaw pauzę ne $80 
;zwiększ wektor tekstu 
:o jeden 


;czy to zmiana prędkości? 
jeśli nie, to idź do LOOP6 
„odczytanie _ prędkości 

;i wstawienie jej do 
programu 

;zwiększ wektor tekstu 

;o jeden 

;i poblerz następny znak 
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LOOPG8 LDX 4$02 
STX HALF+1 iustaw znacznik połowy 
JSR  VECTINCR ;zwiększ wektor tekstu 
;o jeden 
STA ZNAK+1 „wstaw aktualny znak do 
programu 
JMP HOPS ;i wydrukuj jego 1 połowę 
VECTINCR INC VECT 
BNE LOOP9 
INC VECT+1 
LOOP9 RTS 
TEXTSET LDA 4$C7 ;wstaw wartość 
,standardową do 
STA SCRL „wskaźnika przesuwania 
LDX 44801 
STX SPD ;ustaw 1 prędkość 
DEX 
STX SCRDRIVER+ ;wyzeruj pauzę 
STX HALF+1 ji znacznik połowy 
TEXTSET1 LDA 4<TEXT „ustaw wektor na 
;początek tekstu 
STA VECT 
LDA 4£TEXT 
STA VECT+1 
RTS 
TEXT 


Pod etykietą TEXT należy umieścić tekst dla naszego 
scrolł'a, pamiętając o kilku zasadach: 

- tekst MUSI być napisany w kodach ekranowych 
(najłatwiej napisać tekst na ekranie, a potem wstawić go 
w odpowiednie miejsce za pomocą instrukcji TRAN- 
SFER dowolnego monitora pamięci) 

- kod O (zero) oznacza koniec tekstu (procedura star- 
tuje wtedy od początku) 

- znak o kodzie $50 (pisząc na ekranie-litera „P” 
z Shift'em) jest znacznikiem pauzy. Po jego napotkaniu 
procedura zawiesza scrolling na okres 128 wywołań pro- 
cedury, po czym wznawia przewijanie tekstu. 

- znaki o kodach od $41 do $47 (od „A” do „G” 
z Shift'em) są z kolei znacznikami prędkości przewija- 
nia tekstu. Odpowiednio ich używajac można uzyskać 
ciekawe efekty. 

Myślę, że samo prześledzenie napisanej powyżej pro- 
cedury będzie interesującymym zajęciem dła początku- 
jącego programisty, ze względu na dość ciekawą 
technikę automodyfikacji procedury, która wstawia 
odczytane i zinterpretowane dane prosto... w samą sie- 
bie, powodując zmiany w pracy programu. Powodzenia! 


+++ 


Commodore 64 nie posiada w spisie instrukcji BASIC 
żadnych rozkazów pozwalających na wygodne korzystanie 
z dostępnych trybów graficznych. Potencjalny użytkownik 
musi więc zdać się na jedno z dostępnych mu rozszerzeń 
interpretera (np.Simons Basic), lub napisać własne proce- 
dury, które pozwolą na „okiełznanie” nieswornego kom- 
putera. Jak zapewne wiadomo, w trybie wielobarwnym 
(tzw. multicolor) mamy możliwość korzystania ze wszyst- 
kich 16 kolorów. Nie znaczy to, że możemy postawić obok 
siebie kilkanaście punktów, każdy w innym kolorze. Dla- 
czego? Wyjaśnienie jest proste - do zapisu informacji 
o znajdujących się w obrębie danego znaku kolorach 
(opróczkoloru tła) używa się dwóch bajtów, zwanych dalej 
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atrybutami. Dla przypomnienia warto przejrzeć jeden 
z wcześniejszych nurmerów „C64-+4", gdzie w tym samym 
dziale wyjaśniałem sposoby włączania trybów graficznych 
na przykładzie procedury pokazującej obrazki wykonane 
przy pomocy programu Advanced Art Studio. 

Jak pamiętacie, do prawidłowego opisania kompute- 

rowi wyglądu obrazka, oprócz tzw. bit-map'u potrzebne 
były jeszcze dwa zbiory danych, z których wielkość każ- 
dego odpowiadała rozmiarom standardowego ekranu 
tekstowego (a więc $03E8). 
Jeden z tych zbiorów umieszczany był w polu atrybutów 
($D800 - $DBES8), a drugi w obszarze aktualnie usta- 
wionego ekranu tekstowego. Takie ustawienie powodu- 
je przyznanie każdemu znakowi na ekranie graficznym 
(określenie „znak” nie jest precyzyjne - oznacza ono 
obszar 8 - miu bajtów, które będąc wyświetłanymi jeden 
pod drugim, dają nam obszar równy wielkością polu 
przeznaczonemu normalnie na dowolny znak w trybie 
tekstowym) dwóch wspomnianych wyżej atrybutów (po 
jednym bajcie z pola ekranu i poła atrybutów), co daje 
możliwość opisania 3 kołorów. 

Pomyślcie sobie teraz, jak to byłoby fajnie, gdyby 
każdemu z tych bit - map'owych 8 - miu bajtów (tworzą- 
cych „znak”) przypisać własny ekran atrybutów! Ozna- 
czałoby to, że kolory każdego znaku opisywane by były 
przez 9 bajtów (jeden w połu atrybutów, a pozostałe 
osiem na ośmiu odzielnych ekranach tekstowych)! Teo- 
retycznie sprawa jest prosta - wystarczy napisać proce- 
durę, która np. w obsłudze przerwań graficznych będzie 
przełączać położenie ekranów tekstowych co każdą linię 
ekranu. Łatwiej jednak powiedzieć niż zrobić, jak się 
okazuje, układ graficzny w C - 64 w normalnych warun- 
kach pozwala na przełączanie ekranu tylko co osiem (!) 
linii, co w praktyce oznacza, że wszystkie próby zmian 
dokonywane częściej, niż co 8 linii (oczywiście z punktu 
widzenia strumienia ełektronów tworzących obraz na 
ekranie) nie dają zamierzongo efektu, co najwyżej po 
minięciu kolejnych 8 linii położenie ekranu jest ustalane 
na podstawie ostatnio wpisanej tam wartości. Cała więc 
trudność polegała na napisaniu procedury (a w zasadzie 
na znalezieniu techniki), która pozwalała by na „zmu- 
szenie” VIC - a do zmiany położenia ekranu co 1 linię. 
Zamierzenie prawie się udało - napisałem „prawie”, bo 
są także skutki uboczne: 3 pierwsze pionowe linie zna- 
kowe od lewej strony stają się niemożliwe do wykorzys- 
tania, ale „coś za coś”... 

A teraz kilka uwag do umieszczonej poniżej procedu- 
ry FLI (to skrót od angielskiej nazwy tej techniki: Fle- 
xible Line Interpretation): 

- procedura została napisana przy użyciu Turbo 
Assemblera, ale bez przeszkód może być wpisana pod 
dowolny inny assembler, co najwyżej z drobnymi zmia- 
nami; 

- dane do FLI - obrazka zajmują CAŁY bank VIC -a 
od adresu $4000 do $7FFF i ogólnie wygłąda to tak: 

od $4000 do $5FFF - 8 ekranów atrybutów (ekrany 
tekstowe) 

od $6000 do $7FFFF - bit - map 

- dane dla pola atrybutów (pod $D800) należy wpisać 
samemu, bo ta procedura to tylko „wyświetlacz”, a nie 
jakiś specjalizowany „show - pic”. 

1000 
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LDA 4$06 
STA $02 
LDA 4800 
STA $03 
LDX 4$00 
LOOP1 LDA 4538 
CLC 
ADC $02 
STA $1100,X ustawianie tablicy dla 
;$D011 
LDA 460E 
ORA $03 
STA $1200,X ;ustawianie tablicy dla 
:$D018 
LDA $02 
CLC 
ADC Ź801 
AND 4$07 
STA $02 
LDA $03 
CLC 
ADC 4510 
AND 4$70 
STA $03 
INX 
BNE LOOP1 
SEI 
LDA 4$7F 
STA $DCOD 
LDX 4$00 
STX $DCOE 
INX 
STX $DOTA 
LDA 4$3B 
STA $D011 
LDA 4$30 
STA $D012 
LDA 4ł$D8 
STA $D016 
LDA 4596 
STA $DDOO 
LDA $ <IRQ 
STA $0314 
LDA FIRQ 
STA $0315 
LOOP2 BIT $D011 
BPL LOOP2 
LOOP3 BIT $D011 
BMI LOOP3 
CLi 
LOOP4 JMP LOOP4 
IRQ LDX 4$00 „początek pętli FLI 
LOOP5 LDA $1100,X 
LDY $1200,X 
STA $D011 
STY $D018 
IMX 
CPX 4$C0 
BNE LOOP5 ;koniec pętli FLI 
INC $D019 
JMP $EA7E 


Jak daje się łatwo zauważyć, pominąłem w tym arty- 
kule zupełnie sprawę rysowania w tym trybie. Na rynku 
istnieje jednak co najmniej kilka programów, które to 
ułatwiają (np. FLI - GRAPH grupy Black Mail z Hola- 
ndii). 

Paweł (Połonus)  Sołtysiński 
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OFERUJEMY PEŁNĄ GAMĘ 
PÓŁPRZEWODNIKÓW FIRMY COMMODORE! 





PaWo6 Prywatne 
(kompleksowa obsługa C-64 i C-128) 
Adam Bolesta 
Warszawa 
ul. Niekłańska 58 m3 
tel. 17-36-06, 48-54-64 


OFERUJE USŁUGI: 
nagrywanie kaset i dysków z programami do C-64, 
wykonywanie materiałów reklamowych, 
ulotek, szyldów, druków itp. 
dostarczanie instrukcji, 
tworzenie bibliotek software'owych na C-64/128, 
preferencje dla firm. 


JESTEŚMY NAJLEPSI! 


UWAGA UŻYTKOWNICY PROGRAMU 
VOICETRACKER Y 4.0! 

Niektórzy z Was sygnalizują, że nie wiedzą jak 
uruchomić demonstracje muzyczne znajdujące się na 
dyskietce lub taśmie. Otóż demonstracje te należy 
wgrywać nie jako samodzielne programy, ale jako 
moduły programu. Po wgraniu Voicetracker'a i wej- 
ściu do głownego okna edycji wybieramy opcję taśma 
lub dysk, a następnie wprowadzamy komendę LOAD 
(klawisz „I”). Komputer zapyta o tytuł pliku jaki 
chcemy wprowadzić (wpisujemy np. TUNE 01), a 
następnie wczyta go do pamięci. Po przejściu do 


głównego menu klawiszem F1 uruchamiamy daną 
dpmonctrarie 


REDAKCJA 
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Kosmos w jednym duszku! 





Przypuszczam, że każdy lubi popatrzeć na niebo pełne 
gwiazd (zakładając dobrą widoczność). Ładne gwiazdki 
zobaczyć można też w niektórych programach demonstra- 
cyjnych, najczęściej u znajomego, który ma Amigę - czasa- 
mi aż przykro patrzeć, jak niedoświadczonego użytkownika 
Commodore 64 zazdrość zjada. Należy jednak pamiętać, 
że w przypadku programów demonstracyjnych część pre- 
zentowanych efektów nie jest bezpośrednio zależna od 
możliwości sprzętu, a jedynie od pomysłowości programi- 
sty. 
Tak właśnie ewoluował pomysł „przestrzennie” prze- 
suwających się punktów (gwiazd) w realizacji dla C - 64. 
Na początku problemem było stworzenie więcej niż 
8 gwiazdek (tyle tylko jest sprite'ów...), potem nauczono 
się powiełać ich liczbę przez wymuszenie wyświetlania 
duszków w kiłku miejscach ekranu podczas trwania jed- 
nej tzw. ramki. Ostatnim etapem gwiazdek na duszkach 
są gwiazdy na... jednym duszku! Tak, tak - to możliwe! 
Wystarczy wpisać zamieszczony poniżej program 
i sami zobaczycie. 

Procedurę można później wykorzystać np. przy pisa- 
niu własnych programów w BASIC'u. 

Bardziej zainteresowanym połecam wnikliwe obej- 
rzenie budowy programu, a wszystko stanie się (mam 


nadzieję) jasne. 

A oto tekst spod Turbo Assemblera: 
*= $C000 

LDX H$3F 

LDA *$00 

LOOP1 STA  $0340,X 
DEX 
BPL  LOOP1 
INX 

LOOP2 LDA  $E000,X 
AND  4/$01 
BNE  LOOP10 
LDA  +$80 
„BYTE $2C 

LOOP10 LDA  4$C0 
STA  $0340,X 
TXA 
CLC 
ADC  4$06 
TAX 
CPX  4$3F 
BCC  LOOP2 
LDX  4*$00 

LOOP7 LDA  $F400,X 
AND  £$03 
CLC 
ADC  +4$01 
STA  TABO,X 
LDA  $E200,X 
PHA 
AND  4£$01 
STA  TAB2,0 
BNE  LOOP8 
PLA 
JMP  LOOP9 

LOOP8 PLA 
AND  4$7F 

LOOP9 STA  TAB1,X 
INX 


IRQ 
LOOP4 


LOOP3 


LOOPS5 


LOOP11 


LOOP6 


TABO 
TAB1 
TAB2 


INX 

CPX  4$CD 
BCC  LOOP7 
SEI 

LDA  4$7F 
STA  $DCOD 
LDX 4$00 
STX  $DCOE 
INX 

STX  $DOITA 
STX  $D015 
STX  $DO27 
STX  $DO1B 
DEX 

STX  $DO1C 
STX  $DO1D 
STX  $DO017 
LDA  4$1B 
STA  $DO11 
LDA  4$30 
STA  $DO1 
LDA  4<IRQ 
STA  $0314 
LDA IRQ 
STA  $0315 
LDA  ££$0D 
STA  $07F8 
CLI 

RTS 

LDY  +4$30 
INY 

INY 

LDA TAB! - $32,Y 
TAX 

LDA  TAB2-$32,Y 
CPY  $DO012 
BNE  LOOP3 
STY  $D001 
STA  $D010 
STX  $DO0O 
CPY  *$FE 
BCC  LOOP4 
LDX  4$00 
LDA  TAB1,X 
CLC 

ADC  TABO,X 
STA  TAB1,X 
BCC  LOOP11 
LDA  4$01 
STA  TAB2.X 
BNE  LOOP6 
LDY  TAB2,X 
BNE  LOOP6 
CMP 4$79 
BCC  LOOP6 
LDA  4$00 
STA  TAB1,X 
STA  TAB2,X 
INX 

INX 

CPX  4$CD 
BCC  LOOPS 
NC $D019 
JMP  $EA31 
=TAB0+$CD 
=TAB1+$CD 


C-64 


Paweł  Soltysiński 
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Artykuł ten i zamieszczony w nim program powinny 
zainteresować nie tylko posiadaczy stacji dysków. Że 
względu na pewne rozwiązanie programowe może on być 
interesujący dia wszystkich początkujących programistów. 

Przejdźmy jednak do omówienia „dyskowej” części 
zagadnienia. Od razu muszę nadmienić, że problem nie 
dotyczy posiadaczy kart typu FINAL, lub ACTION 
REPLAY, ponieważ obsługa komend dła stacji dysków 
została tam już. wygodnie zrealizowana. Przy założeniu, 
iż użytkownik z różnych względów takowej karty nie 
posiada , wszelkie operacje ze stacją z poziomu BASIC'a 
stają się dość uciążliwe, bo ileż można pisać np.: OPEN 
1,8,15, „S: nazwa1,nazwa2,...”: close 1 nie mówiąc już 
o katalogu dowolnej dyskietki, który za pomocą LOAD 
„$”, 8 za każdym razem musimy umieszczać w pamięci 
operacyjnej, jako program w języku BASIC (tzn. dane 
są w tym właśnie obszarze umieszczane), co po prostu 
niszczy nasz program, o ile się tam wówczas znajdował. 

Aby temu zaradzić, postanowiłem napisać taki prog- 
ram, który pozwolił by mi na obsługę DOS-u (Disk 
Operating System) wolną od wymienionych powyżej 
wad. Ku mojemu zaskoczeniu, całość programu wraz 
z obsługą dodatkowej komendy BASIC okazała się bar- 
dzo krótka (sama procedura zajmuje tylko 272 bajty). 
Prezentowana tu wersja po wpisaniu posiada pierwszą 
linię w języku BASIC, która zawiera rozkaz uruchomie- 
nia programu w j. maszynowym, który uaktywnia właści- 
wą procedurę. Całość należy wpisać do pamięci 
komputera przy użyciu dowolnego monitora pamięci, 
poczynając od adresu $0801. Po prawidłowym wpisaniu 
program należy nagrać na dyskietkę rozkazem: 

S „disk - dos”, 08, 0801, 0932 


Ob 08 c7 07 9e 32 30 36 
31 00 00 00 a2 OO bd 21 
08 9d 80 ce bd 31 08 9d 
90 ce e8 dO f1 4c 80 ce 
a2 01 8e 86 02 ca 8e 20 
dO 8e 21 dO a9 08 85 ba 
a9 ce 8d 19 03 a9 bd 8d 
18 03 a9 4c a2 ca aQ ce 
85 70 86 7d 84 7e a9 ad 
aQ0 ce 4c le ab Od 44 49 
53 4b 2d 44 4f 53 2f 36 
34 2b 34 Od 00 58 20 1b 
e5 a2 fl 8e 86 02 9a 40 
74 a4 c9 40 fO Qa c9 3a 
bO 03 4c 80 00 4c 8a 00 
20 73 00 a0 00 bi 7a fO 
03 c8 dO f9 cO 00 dO 21 
a9 Od 20 d2 ff a5 ba 20 
b4 ff a9 6f 20 96 ff 20 

a5 ff 20 d2 ff c9 Od dO 
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a4 a0 00 bi 7a c9 24 fO 
03 4c 6d cf a9 Od 20 d2 
ff a9 01 a2 60 a0 a3 20 
bd ff a2 08 a0 00 20 ba 
ff 20 cO ff a2 01 20 c6 
ff 20 cf ff 20 cf ff 20 

cf ff 20 cf ff a5 90 do 
21 20 cf ff aa 20 cf ff 
20 cd bd 20 3b ab 20 cf 
ff 20 d2 ff dO f8 a9 Od 
20 de ff ad 01 dc c9 7 
dO d5 a9 01 20 c3 ff 20 
cc ff 4c 04 cf a5 ba 20 
b1 ff a9 6f 20 93 ff a0 
00 bi 7a fO QCe 20 a8 ff 
c8 dO f6 a0 00 bl 7a c9 
55 fO 03 20 ae ff 4c 04 
cf 00 


Po uruchomieniu program instaluje nową komendę, 
rozpoznawalną przez edytor BASIC'a. Komenda ta skła- 
da się ze znaku „(Q” i występującego po nim argumentu, 
np: 
($ - wyświetla na ekranie katalog dyskietki 
(QS: nazwa - kasuje z dysku program „nazwa” 

Q - (bez argumentu) powoduje wyświetlenie raportu 
stacji. 

W sumie rozkaz ten zastępuje operację 
OPEN/CLOSE z języka BASIC - treść rozkazu 
wysyłanego do stacji należy po prostu wpisać po znaku 
„©Q” i wcisnąć RETURN. 

Na początku tego artykułu napisałem o tym, że 
początkujący programiści znajdą tutaj ciekawe 
rozwiązanie programowe. Aby zainstałować własny roz- 
kaz w j. BASIC, należy zmienić dla własnych celów 
wektory systemu i napisać własne procedury obsługi 
nowych rozkazów. Najczęściej do tych celów zmieniany 
jest wektor $0308/50309. W moim programie zde- 
cydowałem się nie zmieniać żadnego z tych wektorów - 
moim celem stała się niewielka procedura umieszczona 
na pierwszej stronie pamięci od adresu $0073, służąca 
do odczytywania kolejnych bajtów programu. Jest ona 
przy uruchamianiu komputera przepisywana z pamięci 
ROM do RAM z wielu względów (m.in. ze względu na 
późniejsze adresowanie pamięci przy użyciu wektora 
zawartego w tej procedurze, np. LDA($7a),Y). 
Ciekawym proponuję prześledzenie działania tego 
programu, który w czasie działania znajduje się w Obsza- 
rze od adresu $CE80 do $CF90. 


Paweł  Soltysiński 


9/91 





C-64 





W zachodnich magazynach „sztuczki i kru- 
czki” (Tips und Tricks) mają swoje stałe miejsce. 
W działach tych opisywane są różne chwyty i po- 
mysły, jak usprawnić działanie programów lub 
sprzętu. Okazuje się bowiem często, że prostymi 
metodami można poprawić ich właściwości. Dziś 
przedstawiamy kilka sztuczek w oparciu o na- 
desłane przez czytelników magazynu „ó4'er” 
materiały, a opublikowane w numerze 11/88 . 


Poszerzony RAM - dysk 


Użytkownicy rozszerzenia RAM'u 1700 (128 kB) 
szybko zauważą, że GEOS nie jest w stanie zastosować 
go jako RAM - dysku z powodu ograniczonej pojem- 
ności. Fakt ten skłania ich do poszukiwania większych 
rozszerzeń. Można jednakże do tego celu wykorzystać tę 
samą płytkę, wymieniając 16 układów pamięciowych na 
kości typu 41256 (120 ns). 

Aby dokonać wymiany potrzebne jest doświadczenie 
przy lutowaniu, bowiem trzeba najpierw wylutować sta- 
re układy RAM (UŻ do U17). Na ich miejsce wlutować 
podstawki o 16nóżkach, a następnie wstawić w nie ukła- 
dy 41256 (120 ns). Na koniec należy usunąć połączenie 
J1, aby dokonane rozszerzenie mogło zostać wykryte. 

Teraz już GEOS będzie w stanie wykorzystać nasze 
rozszerzenie jako RAM - dysk. 


Dioda sygnalizująca błędy w 1581 


Zapewne większości użytkowników 1581 przeszka- 
dza fakt, że czerwona dioda sygnalizująca błędy w tym 
napędzie, w odróżnieniu od pozostałych napędów tylko 
bardzo słabo migocze. W zależności od oświetlenia cięż- 
ko jest czasami stwierdzić, czy błąd wystąpił czy też nie. 
Sprawdzamy, więc co jest przyczyną migotania, a nie 
włączania i wyłączania tej diody. 

Gdy się dokładniej przyjrzymy schematowi stacji, 
szybko można stwierdzić, że dioda połączona jest przez 
opornik do układu wejścia/wyjścia. Drugi opornik przy- 
łączony do napięcia +5V powoduje, że dioda jest ciągle 
włączona: czerwona dioda nie może więc zostać wyłączo- 
na. 

Rozwiązanie problemu jest następujące: należy usu- 
nąć opornik R14 z płyty głównej. Dzięki brakującemu 
połączeniu z +5V dioda daje się teraz wyłączyć i jej 
migotanie można łatwo rozpoznać. 
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Błędy stacji 1571 

Gdy moja stacja przestała poprawnie odczytywać 
dane z dyskietek (np. błąd odczytu nr 27) postanowiłem 
wykryć, co jest tego przyczyną. Nie mogło to być spowo- 
dowane błędami w programach, ponieważ dotychczas 
działały one bez zarzutu. Pozostaje więc sprzęt. Podej- 
rzenie o zabrudzenie głowicy zapisująco - odczytującej 
okazało się nietrafne po jej przeczyszczeniu. Także 
kalibracja głowicy w serwisie nie przyniosła oczekiwane- 
go rezultatu. W końcu pozostało tylko jedno źródło błę- 
dów: rozregulowanie odstępu głowicy od nośnika. 

Sprężyna, które dociska głowicę zapisująco - odczytu- 
jącą do powierzchni dyskietki może ulec wykrzywieniu, 
jeśli stacja pozostaje przez dłuższy czas z otwartym 
napędem, bądź gdy jest zamknięta bez włożonej dyskie- 
tki. A jeśli ta sprężyna ulegnie wykrzywieniu to zabrak- 
nie przeciwważącej siły dla głowicy z drugiej strony. 
W ten sposób mogą wystąpić zakłócenia zarówno przy 
zapisie, jak i odczycie. 

W żadnym jednak wypadku nie należy próbować spo- 
wrotem odginać sprężyny, która dociska w dół górną 
głowicę, gdyż może to spowodować uszkodzenie zarów- 
no głowicy, jak i dyskietki. Gdy stwierdzą taką usterkę 
najlepiej będzie oddać stację do serwisu. Aby uniknąć 
w przyszłości takich awarii należy się trzymać następu- 
jącej zasady: 

Stacja powinna mieć zawsze dyskietkę w środku oraz 
zamknięty klucz. 


Pewniejsza współpraca z 1581 


Zdarza się, że stacja 1581 uszkadza czasami pojedyn- 
cze ścieżki. Błąd ten występuje nieregularnie i w związ- 
ku z tym jest trudny do wykrycia. Po dokładnej analizie 
uszkodzonych dyskietek udało się go jednak zlokalizo- 
wać: stacja zapisuje poprawnie część Ścieżki, a część 
w ogóle pomija. Z tego wynika, że procedura zapisująca 
zostaje w pewnym momencie przerwana. Owo przerwa- 
nie zapisu powoduje, że nie zgadza się suma kontrolna. 
Gdy próbuje się następnie odczytać uszkodzoną Ścieżkę 
pojawiają się różnego rodzaju komunikaty o błędzie 
odczytu. Usterkę można usunąć przynajmniej częścio- 
wo, przy pomocy programu „Ratownik ścieżek” (listing 
na następnej stronie) - naprawia on pojedyncze Ścieżki. 

Jest to jednak niewielka pomoc, ponieważ ten prog- 
ram dopisuje tylko poprawną sumę kontrolną, nato- 
miast nie przywraca utraconej informacji. Ścieżka staje 
się tyłko ponownie zdolna do zapisu i odczytu. 

Trzeba więc dotrzeć do źródła tych kłopotów. Po 
wnikliwej analizie listingu ROM'u stacji 1581 znalezio- 
no w końcu przyczynę: w procedurze zapisu na dysk nie 


FLUE LH 13 


O INPUT "Uszkodzona sciezka i strona”; T, 
s:S=S*20+ 19 

1 OPENZ2, 8, 2, "" 
20;T;8 

2 PRINT£1, "UO" + CHR$ (134) + CHR$ (2) + 
CHRS$ (T-1) + CHR$ (10); 

3 PRINT£1, CHE$ (T-1) + CHR$ (181) + CHR$ 
(S) : CLOSE1 


: OPEN1, 8 15 : PRINT4£1, "'U1 


zostały zabiokowane przerwania, przez co może ona 
zostać w każdej chwili zatrzymana. Przy usuwaniu tej 
usterki pojawił się nowy problem: test sumy kontrolnej 
podczas włączania stacji. Można go obejść poprzez prze- 
skoczenie procedury testującej tą sumę. Wystarczy 
zmienić części ROM'u, tak by nie spowodować zawie- 
szenia programu przy wykonywaniu tej procedury. 
Teraz można już wprowadzić rozkaz błokujący przerwa- 
nia. Ponieważ jednak pamięci ROM nie można ponow- 
nie zapisać potrzebna będzie do zamiany pamięć 
EPROM (27256), oraz programator EPROM'u. 


PUBLIC DOMATN PACK - TAPE NR1 
SINUSDATA - EDITOR 
FAST CRUNCHER V3 
ANAL S.C. IBEYOND 
VECTOR - VICTORY 
PUZZLENOID +4 
TUNE OF MONTH 41 
NIM 
STRZAŁKA 64+ 
LOGO - WRITER V.2.0 
CAN”T TOUCH IKU! 
INTRO PRV 
BONZIEED !! 

ZAX PACKIS 

READ THIS FIRST 
COMMERCIAL BREAK 
290 SPRITES! 

NOTE - ABOUT 

BAD NEWS NR2 

TO BAD NEWS... 
CONTACT CORNER! 
PROJEKT DUSZKÓW 
SYMPHONY NR 14 
SYMPHONY NR 15 
SYMPHONY NR 16 
SYMPHONY NR 17 
SYMPHONY NR 18 
SYMPHONY NR 19 
CRUISER/GIANTS 
NOTE > ANO < PADUA 
LET'S DYSP! 
FINALTAPE 

MUSIC - SEARCHER 











Trzeba zmienić 8 bajtów, które wyszczególniono 
w tabeli. 


wartość | wartość 


$afac 


| Safo | $3a | s | Przeskoczenie testu sumy 


Skok do rozszerzenia 


W ROMiie stacji 1581 pozostaje jeszcze jeden błąd 
objawiający się tym, że czasami nie następuje zapis sek- 
tora. Nie został on jeszcze wykryty. Jeśli ktoś z Was jest 
w stanie go zlokalizować, prosimy o kontakt. 

Jeśli posiadacie własne „sztuczki i kruczki” piszcie do 
nas. Chętnie je opublikujemy. 

Redakcja 


W związku ze znacznym wzrostem opłat za 
przesyłki pocztowe, mając na uwadze dobro na- 
szych czytelników sugerujemy zamawianie 
numerów zaległych naszego czasopisma na nieco 
innych zasadach. 

Koszty przesyłki za tzw. zaliczeniu pocztowym 
przedstawia tabela (rubryki 2, 3, i 4). Wynika z niej, że 
koszty przesłania dwóch pierwszych numerów „64 plus 
4' są wlększe niż ich wartość! Zamawiając numery 
wartości 6.000 zł zmuszeni jesteście dopłacić poczele 
jeszcze 8.000 złł 

Zupełnie inaczej przedstawia się sytuacja w tabelach 
5,6i7. Wpłata kwoty z rubrykinr 7 na nasze konto (wraz 
z czytelną adnotacją, których numerów dotyczy, 
umleszczoną na wszystkich odcinkach blankietu) 
powoduje, że otrzymujecie przesyłkę bez kosztów 
pobranial 

Proponujemy abyście zaległe numery naszego 
pisma zamawlali w sposób następujący: 
wykorzystując tabełę - rubryki 1, 2, 5 I 7 - wyliczyli kwotę 
wpłaty, a następnie przesłall ją na nasze konto. Po 
otrzymaniu wpłaty natychmiast realizujemy  przesyłkęl 

Uwaga: dla dokonania wpiaty prosimy wykorzystać 
bankiet zamieszczony na następnej stronie. Wszystkie 
dane prosimy pisać czytelnie | - zgodnie z rubrykami na 
blanklecle - dziękujemy! 












w płata na a kate 


| 





SESbraniem 
pisma pisma 

RA | 2 |a| scdiNOKo| M 
|_x1Xil_ | 6.000, | 8.000,- |14.000,-| 6.000,- | 1.000,- | 7.000,- | 
Lodi 11.000: | aso to -| 11.000. 1.500 12.500,- 
| x,XIH |16.000.- | 8.500,- |24.500,-|16.000,-| 1.500,- |17.500,-| 
POD 21.000.- -8500. |2*.500. 2008: 1500: 22.500,- 
|X1,XILI-V |26.000,- 10.000.- 2.000.- |28.000,- 
| a100; 10.000,- |41.000,-|31.000.- | 2.000,- |33.000,-. 
[x1Xd1Lvt|36.000 - |10.000.-|46.000,-[36.000.-| 2.000, |36.000,-| 

XI s | 46.000. |14.000,- |60.000,_|46.000,- [8.000 [48.000 
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DLA WSZYSTKICH 


WSZYSTKICH ZAINTERESOWANYCH 


. 6.8 
NABYCIEM m a óżgc 
ZALEGŁYCH NUMERÓW a o: 30R37008.m 
80226308 SEL 
„64 plus 4 50/06 8 
Ś : SMES Z :'3 Gm3IDO 
99 © 5 aa DH 2 » U se 
SX AMIG. SERERERIECELE 
SEKEEEEBIAFE 
INFORMUJEMY, ŻE POSIADAMY 5 EE "S2oŚ 
JESZCZE OGRANICZONĄ ILOŚĆ $ EEBEDICEEZI 
NUMERÓW SĘ 8:38 43828 
OD LISTOPADA 1990R. Ai Pi Bzae 
DO CZERWCA 1991R. 
ZAMÓWIENIA PROSIMY KIEROWAĆ 
NA ADRES: 
Przedsiębiorstwo ABUK sp. z 0.0., 
87-200 Wąbrzeźno, 





ul. 1 Maja 33. 
(Pod tym adresem mieści się dział kolportażu - tam też 
prosimy przesyłać wszelką korespondencję dotycząca 
kolportażu czasopisma, dyskietek, taśm itd. Adres 
redakcji się nie zmienił - patrz stopka.) 


na rachunek: 


Odcinek dla Banku 
Przedsiębiorstwa ABUK sp. z 0.0. 


ZAMÓWIONE NUMERY PRZEŚLEMY ZA 
ZALICZENIEM POCZTOWYM. 


4 


(dokładny i CZYT ELNY adres) 
Bank PKO SA Bydgoszcz, konto 


87-100 Wąbrzeźno, ul. 1 Maja 33, 
5.0901 1-400522.7-136-11-111.0. 


WPRACAJĄCY ...uuuuaraauanaazaaaaa 








W związku z pojawiającymi się kłopotami w 
dystrybucji oferowanych przez nas dyskietek i taśm 
(wynikającymi z nieczytelnego bądź niekomplet- 
nego wypełnienia blankieiów wpłat) 
przedstawiamy obok specjalny druk. Blankiet ten 
może służyć jako zamówienie i dowód wpłaty dla 
wszystkich oferowanych przez nas usług: sprzdaż 
dyskietek i taśm PDP, Voicetracker'a, zamówienie 
ogłoszeń itd. 








REDAKCJA 


na rachunek: 
Przedsięblorstwa ABUK sp. z 0.0. 


o A AI 


UWAGA! 
W związku ze wzrostem opłat pocztowych 
(nasze pismo jest już grubsze i clęższe, 
a więc musimy za jego wysyłkę płacić więcej) 


(dokładny i CZYTELNY adres) 


Odcinek dla posiadacza rachunku 
Bank PKO SA Bydgoszcz, konto: 


5.09011-400522.7-136-11-111.0. 





87-100 Wąbrzeźno, ul. 1 Maja 33, 


SŁOWRISP.. aaa owa oai 
WPłACAJĄCY ....u.auuauaaauanaaan12 








z przykrością informujemy, 
że od 1 sierpnia cena 1 egzemplarza „64 plus 4” 
w prenumeracie wynosi 50002ł. 


Przypominamy, że prenumeratę można zawrzeć 
na dowolny okres (nle krótszy niż dwa miesiące) 
do końca bleżącego roku. Na CZYTELNIE 
wypełnionych blankietach wpłat prosimv dopisać 
„PRENUMERATA” oraz okres jej trwania. 
Wpłaty prosimy przesyłać wykorzystując 


zamieszczony obok  blankiet. 
L Przepraszamy. 
C=] saw 


na rachunek: 


Odcinek dla Poczty 
Przedsiębiorstwa ABUK sp. z 0.0. 


(dokładny i CZYTELNY | Add) | 
Bank PKO SA Bydgoszcz, konto: 


87-100 Wąbrzeźno, ul. 1 Maja 33, 
5.09011-400522.7-136-11-111.0. 


SIOWNIO i rd WAŁ 0 1 
Wpłacający . «aaa: wara wo 
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DŁA WSZYSTKICH 





STATEX 
PRACOWNIA KOMPUTEROWA 
4 01-911 Warszawa, ul. Andersena 2 
8 oferuje 
Ś PEŁNY SERWIS SPRZĘTU 
3 COMMODORE 64 / AMIGA, 
R PC - XT/AT, 
D stacje dysków, drukarki, cartridge. 
[E 
© 
6 
E 
ź ż 
G z 
z LL 
, 5 
4 o 
cc 
- > 
E 
8 
a. 
8 
5 
[= 
z a 
G z 
Ź u (333233323333333233333333833333333333383838338388888A8 
= z se COMMODORE 64 > 
Ą iu RE AMICOS COMPUTER = 
= sk 42-200 CZĘSTOCHOWA sa 
2 © iż TEL 22-22-38 Ę 
w o = ATRAKCYJNE PROGRAMY NA KASETACH se 
- Ę 2 CIEKAWE PROGRAMY NA DYSKACH ma 
a s KATALOGI GRATIS  (koperta+znaczek) % 
ge re WYSYŁKA POCZTĄ EKSPRESOWA s 
ż 8 


MIKRO 80-288 GDANSK MORENA 
ul.Marusarzówny 6 
SERWIS ter 48 50-63 900-1700 


Oferujemy do komputera AMIGA 500 


ROZSZERZENIE RAMI 


PZ " 
Wszystkie rozszerzenia mogą być wyposażone w zegar 
z podtrzymaniem akumulatorowym. 
Prowadzimy też naprawy sprzętu komputerowego i peryferii. 
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W dzisiejszym odcinku naszej opowieści o 
Sculpt'cie omówię kilka nowych rzeczy. Na 
pierwszy ogień pójdzie menu Tools, które składa 
się z kolejnych pozycji: Selector, Deselector, 
Magnet, Curve, Extrude, Edge maker, Grabber. 


SELECTOR 


Po wybraniu opcji Selector otrzymamy zamiast kur- 
sora mały prostokącik, którym możemy dokonywać 
wyboru większej ilości punktów. Wszystkie punkty 
znajdujące się w obrębie tego prostokącika w czasie, gdy 
klikamy myszą zostaną wybrane (zmieni się ich kołor na 
żóły). 


DESELECTOR 


Wybierając opcję Deselector otrzymujemy prostoką- 
cik koloru różowego, dzięki któremu możemy deakty- 
wować wszystkie wcześniej uaktywnione (żółte) punkty. 
Punkt zdeaktywowany ma kolor różowy i nie można 
wykonywać na nim żadnych operacji tj. przenoszenia, 
usuwania czy tworzenia krawędzi (edge). 


MAGNET 


Opcja: Magnet 


Doa wyboru: Attract, Repel 

Są to dwa zwykłe magnesiki: Attract (Przyciągający) 
i Repeł (Odpychający), z których wybieramy jeden 
aktualnie nam potrzebny i po zmianie kursora na mały 
magnesik wciskamy lewy przycisk myszki. Trzymając go 
cały czas wciśnięty, przesuwamy magnesik w odpowied- 
nie miejsce i wciskamy prawy przycisk myszy. Punkty 
aktywne będą się zbliżać, lub oddalać w zależności od 
użytego magnesu. Aby opuścić opcję Magnet należy 
zwolnić lewy przycisk myszy, a następnie wcisnąć prawy. 


CURVE 


Za pomocą opcji Curve możemy tworzyć figury o dowo- 
lnie wybranych kształtach. Po wybraniu tej opcji zmienia 
nam się wygląd kursora. Tworzenie figury odbywa się na 
zasadzie rysowania kolejnych punktów łączonych 
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liniami. Ustawiamy kursor w miejscu, gdzie chcemy 
rozpocząć nasze dzieło i wciskamy lewy przycisk myszy. 
Następnie trzymając wciśnięty przycisk, przesuwamy 
kursor w miejsce gdzie chcemy mieć drugi punkt tej 
figury i przyciskamy prawy przycisk myszki. Zostanie 
narysowana linia łącząca dwa powstałe punkty. Teraz 
możemy powtarzać tę operację aż do znudzenia. Gdy już 
figura jest gotowa nałeży opuścić opcję Curve, a można 
dokonać tego w ten sam sposób, w jaki opuszcza się 
większość opcji Sculpta, to jest poprzez wciśnięcie 
prawego przyciku naszej myszki. 


EXTRUDE 


Extrude jest bardzo pomocną opcją zwłaszcza przy 
tworzeniu obiektów, np. napisów, które należy pogrubić 
względem jednej z osi. Uaktywniamy odpowiednie 
punkty figury i wybieramy pozycję Extrude. Chwila oc- 
zekiwania i oto mamy... Pozornie nic się nie zmieniło, 
ale to tylko złudzenie. Nasza figura została pogrubiona, 
ale jest Ściśnięta i teraz należy przesunąć jej tylną 
ściankę w odpowiednie miejsce, aby nadać naszej figurze 
właściwą grubość. Przesunięcia dokonujemy za pomocą 
opcji Grabber, do której wchodzimy automatycznie po 
opuszczeniu opcji Etrude, ale o tym za chwilę. 


EDGE MAKER 


Tworzy krawędź pomiędzy dwoma punktami. Po 
wybraniu tej opcji wciskamy i przytrzymujemy lewy 
przycisk myszy, i przesuwamy kursor na odpowiedni 
punkt, a następnie wciskamy prawy przycisk. W tym 
momencie, od tego punktu będzie się ciągnąć kreska 
(nasza krawędź), którą prowadzimy do następnego 
punktu i tam wciskamy prawy przycisk myszy. 

Wyjście z tej opcji następuje po wciśnięciu tylko pra- 
wego przycisku myszy. 


GRABBER 


Grabber jest urządzeniem do przenoszenia akty- 
wnych punktów. Najpierw ustawiamy kursor w odpo- 
wiednim miejscu, a następnie wybieramy opcję Grabber 
(można ją wybrać także poprzez kliknięcie na gadżecie 
w lewym dolnym 1ogu okienka edycji). Teraz wciskamy 
i przytrzymujemy lewy przycisk myszki, i przesuwamy 
kursor, wraz z niin są przesuwane aktywne punkty. Po 
przesunięciu do właściwej pozycji, wciskamy prawy 
przycisk aby opuścić tę opcję. 
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Kolejnym menu, które omówię jest menu Edit. 
Składa się ono z następujących pozycji: Select, Deselect, 
Erase, Modify, Do, Add, Snap, Name, Grid, Coor- 
dinates. 


SELECT 


Opcja: Select 


Do wyboru: All onected, Indicated vertex, 
Swap, Named vertices, Indicated edge, Indicated 
spline, Indicated path. 

Opcja Select służy do uaktywnienia poszczególnych 
punktów naszej sceny. Wybierając poszczególne pozycje 
z menu możemy dokonywać aktywacji różnych ele- 
mentów: 

ALL - wszytkie punkty ze sceny zostaną uaktywnione. 

CONNECTED - wszystkie punkty połączone z pun- 
kiem znajdującym się bezpośrednio pod kursorem zo- 
staną uaktywnione. 

INDICATED VERTEX - uaktywniony zostanie punkt 
(wierzchołek) znajdujący się pod kursorem. 

SWAP - wszystkie aktywne (żółte) wierzchołki 
zostaną zdeaktywowane (różowe), a wszystkie nieak- 
tywne zostaną uaktywnione. 

NAMED VERTICES - aktywacja wszystkich nazwa- 
nych (będziemy zapytani o nazwę) wierzchołków. 

INDICATED EDGĘ/SPLINĘ/PATH - wszystkie wie- 
rzchołki (punkty), krawędzie, ścieżki, itp. znajdujące się 
w obrębie kursora. 


DESELECT 


Opcja: Desełect 


Do wyboru: All, Conected, Indicated vertex, Swap, 
Named vertices, Indicated edge. 

Opcja Desełect działa odwrotnie do opcji select co 
oznacza, że deaktywuje ona wierzchołki (punkty). 


ERASE 


Opcja: Erase 


Do wyboru: Sełected vertices, Selected Edges, 
Indicated vertex , Indicated edge, Indicated !amp, 
AII lamps, Named vertices, Indicated spline, Indicated 
path, All. 

Opcja Erase służy do usuwania zbędnych elementów: 
punktów, krawędzi, lamp, itp. 

ALL - wszysko zostanie usunięte (lampy, wierzchołki, 
itd.); wybieramy przy tworzeniu nowej sceny. 

SELECTED VERTICES - wszystkie aktywne (żółte) 
wierzchołki zostaną usunięte. 

NAMED VERTICES - zostaną usunięte wierzchołki 
o podanej nazwie. 

INDICATED VERTEX - usunięty zostanie punkt 
znajdujący się pod kutsorem. 
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SELECTED EDGES - wszystkie aktywne krawędzie 
zostaną usunięte. 

INDICATED EDGE - zostanie usunięta krawędź 
znajdująca się pod kursorem. 

ALL LAMPS - wszystkie lampy (Źródła światła) 
zostaną usunięte. 

INDICATED LAMP - zostanie usunięta lampa znaj- 
dująca się bezpośrednio pod kursorem. 


MODIFY 


Opcja: Modify 


Do wyboru: Faces, Lamps, Wire-frame cołors 
Local origin, Indicated knot, Indicated tumble 
Take. 

Służy do zmiany parametrów dla poszczególnych ele- 
mentów. 

FACES - służy do zmiany parametrów ścian (metal, 
szkło, lustro, itp.) oraz ich kolorów. 

ŁAMPS - służy do modyfikacji źródeł Światła, ich 
naiężenia, oraz koloru. 

WIRE FRAME COLORS - kolory przy kreśleniu w 
trybie wire-frame. 

INDICATED KNOT/THUMBLE - służy do modyfi- 
kacji parametrów animacji. 


DO 


Opcja: Do 


Do wyboru: Expand, Subdivide, Spin, Fill 
Unslice, Reflect, Make helix, Make spline, 
Make path, Show path position, Hide selected verices, 
Reveal hidden vertices, Make Tri-View small, 
Make Tri-View big. 

Opcja Do jest pomocniczą opcją i składa się na nią 
wiele różnych elementów. 

EXPAND - wszystkie aktywne wierzchołki będą wy- 
korzystane w tej opcji, a służy ona do powiększania, lub 
pomniejszania figur. Operacja odbywa się względem 
kursora. 

SUBDEVIDE - dzieli wszystkie krawędzie pomiędzy 
aktywnymi wierzchołkami na dwie części poprzez 
wprowadzenie dodatkowych wierzchołków w połowie 
długości tych krawędzi. 

SPIN - tworzy figurę obrotową z aktywnych wierz- 
chołków. 

FILL - służy do utworzenia Ściany z aktywnych wierz- 
chołków. Płaszczyzna wyznaczona przez nie będzie po- 
dziełona na trójkąty. 

REFLECT - wykona lustrzane odbicie wszystkich ak- 
tywnych wierzchołków. 

MAKE HELIX/PATH/SPLINE - służą do tworzenia 
animacji. 

HIDE SELECTED VERTICES - schowa aktywne 
wierzchołki. 

REVEAL HIDDEN VERTICES - ukaże wszystkie 
ukryte, poprzednią opcją, wierzchołki. 
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MAKE TRI-VIEW SMALL/BIG - ustawienie wieł- 
kości okien na których pracujemy. 


ADD 


Opcja: Add 


Do wyboru: Duplicate, Sphere, Hemisphere, 
Cube, Prism, Disk, Circle, Cylinder, Tube, 
Cone, Lamp, Vertex, Edges. 

Opcja Add pozwala na wprowadzenie już gotowych 
figur do naszej sceny. 

DUPLICATE - tworzy figurę bliźniaczo podobną do 
figury utworzonej przez aktywne wierzchołki. 

SPIIERE - tworzy kulę (możemy wybrać ilość podzia- 
łów, czyli dokładność naszej kulki). 

HEMISPHERE- tworzy pókulę (Coś na kształt obser- 
watorium - wygląda bardzo ładnie!). 5 

CUBE - zwykły (o ile ktoś zna niezwykłe!) sześcian. 

PRISM - ostrosłup czworokątny. 

DISK - taki talerzyk - podajemy liczbę wierzchołków 
(bo nie jest to koło, ale wielokąt foremny). 

CIRCLE - tworzy okrąg, 

CYLINDER - walec. 

'TUBE - rura. 

CONE - stołek. 

LAMP - i mamy kolejne źródło światła na pozycji 
kursora. 

VERTEX - tam gdzie znajduje się kursor pojawi się 
wierzchołek. 

EDGE - dwa aktywne wierzchołki zostaną połączone 
krawędzią. 


SNAP 


Opcja: Snap 


Do wyboru: Cursor to veriex, Cursor to center, 
Cursor to cenuroid, Cursor to grid, Selected vertices to 
grid, Connected vertices to sphere, Selected vertices to 
plane. 

Opcja Snap służy do ustawiania wybranych eleme- 
ntów na odpowiednich pozycjach. 

CURSOR TO VERTEX - przesunie kursor do najbli- 
ższego wierzchołka. 

CURSOR TO CENTER - przesunie kursor do Środka 
okienek. 

CURSOR TO CENTROID - kursor zostanie przesu- 
nięty do punktu, który jest średnią arytmetyczną 
pomiędzy wszystkimi wierzchołkami. 

CURSOR TO GRID - przesunie kursor: do najbli- 
ższego oczka siatki. 

SELECTED VERTICES TO GRID - aktywne wierz- 
chołki zostaną przesunięte do najbliższych im oczek 
siatki. 

CONNECTED VERTICES TO SPHERE - połączone 
wierzchołki zostaną ułożone na kuli. 

SELECTED VERTICES TO PLANE - aktywnewierz- 
chołki zostaną sprowadzone do wspólnej płaszczyzny. 
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NAME 


Opcja: Name 


Do wyboru: Selected vertices, Connected vertices, 
Indicated path, Indicated lamp. 

Name Służy do nazywania elementów sceny, lub 
zmiany istniejących już nazw. 

SELECTED VERTICES - umożliwia nazwanie wy- 
branych (aktywnych) wierzchołków. 

CONNECTED VERTICES - dzięki tej opcji możemy 
nazwać kilka połączonych ze sobą wierzchołków. Na 
przykład definiujemy kulę i ustawiamy kursor ponad 
jednym z jej wierzchołków. Po wybraniu tej opcji 
możemy nazwać wszystkie połączone wierzchołki tej 
kuli. Możemy im nadać np. nazwę KULKA i gdy chcemy 
się odwołać do wszystkich wierzchołków kuli (np. wy- 
mazać) to nie robimy żadnych operacji w styłu aktywne 
wierzchołki i tym podobne, ale po prostu usuwamy 
wierzchołki o nazwie KULKA. 

INDICATED PATH/LAMP - umożliwia usunięcie 
lampy/ścieżki nad którą znajduje się kursor. 


GRID 


Opcja: Grid 


Do wyboru: On, Off 

Opcja Grid służy do włączenia (On), lub wyłączenia 
(Off) siatki. Siatka jest to coś w rodzaju papieru mili- 
metrowego co ułatwia dokładne ustawianie wierz- 
chołków, oraz ułatwia orientację. 


COORDINATES 
Włączając opcję Coordinates, Sculpt 4D pokaże małe 


okienko, w którym będą wyświetlane pozycje kursora 
w definiowanej scenie. 


Dudar 


Marcin „Duddie” 
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W dzisiejszym odcinku zapoznamy się z najprostszą 
techniką animacji obrazu: z wykorzystaniem SPRITE'ów. 
SPRITE są to obiekty o ograniczonej liczbie kolorów (do 
czterech uwzględniając kolor tła), szerokości 16 punktów 
i dowolnej wysokości, Dzięki temu, iż posiadają odrębne 
kanały DMA mogą być poruszane niezależnie od 
zawartości ekranów graficznych, co czyni je bardzo wygod- 
nymi w obsłudze i sprawia, że znajdują szerokie za- 
stosowanie. 

Aby umieścić naszego SPRITE'a na ekranie musimy 
sporządzić specjalną strukturę, która poinformuje kom- 
puter o kształcie naszego obiektu i jego pozycji na ek- 
ranie. Struktura ta spełni podobne zadanie, jak Copper 
List dla procesora obrazu. Jednak zanim nauczymy Się 
ją tworzyć, przedstawię w jaki sposób komputer inter- 
pretuje liczby będące wskaźnikami pozycji oraz dane dla 
grafiki, czyli kształtu SPRITFE'a. 

Pozycję SPRITE'a na ekranie charakteryzują dwie 
liczby - jego współrzędne: pozioma X, oraz pionowa Y. 
Są one względnym przesunięciem naszego obiektu od 
lewego, górnego rogu ekranu. 

* Pozycja pozioma - X. 

Pozycja pozioma SPRITE'a może być liczbą 
mieszczącą się w zakresie od 0 do 447. Jednakże, aby 
obiekt był widoczny na ekranie przy standardowo usta- 
wionych borderach, jego współrzędna X nie powinna 
być mniejsza niż 64 i większa od 368. Ostatecznie mamy 
więc 368-64=304 dozwolonych pozycji poziomych. 
Uwzględniając, iż SPRITE może mieć maksymalnie 16 
punktów szerokości, otrzymujemy 304+16=320, czyli 
tyle punktów iloma dysponujemy w trybie „Lo-Res”. 

* Pozycja pionowa - Y. 

Pozycja pionowa może przyjmować wartości z zakre- 
su 0 do 262. Zazwyczaj jednak używa się wartości 
z zakresu 44 do 243, co uwzględniając linię O daje nam 
200 pozycji w pionie. Należy tu zaznaczyć, iż podany 
wyżej zakres dotyczy SPRITE'a o wysokości jednej 
linii, 

a takich nikt nie będzie raczej używać (może jedynie do 
robienia gwiazdek). W przypadku używania objektów 
większych rozmiarów dolna granica (tzn. 243) od- 
powiednio zmniejszy się o wartość wysokości SPRITE'a. 

Teraz, gdy poznaliśmy ograniczenia i możliwości 
umieszczania SPRITE'ów w różnych miejscach ekranu, 
zajmijmy się ich kształtem. Pierwszą rzeczą którą 
musimy zrobić jest wykonanie projektu SPRITE*a, naj- 
lepiej na papierze. Musimy przy tym pamiętać, że może 
mieć on jedynie 16 punktów szerokości i być w 3 ko- 
lorach + border. Załóżmy, że interesuje nas następujący 
kształt: 

1111111111111111 


112222222222221 1 gdzie cyfry oznaczają: 
112233333333221 1 1- kolor czerwony 
1122330000332211 2 - kolor pomarańczowy 
1122330000332211 3 - żółty 
1122333333332211 O - kolor tła 
1122222222222211 


1111111111111111 
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239.144 


Gdy kształt jest gotowy, rozkładamy nasz rysunek na 
dwa Bit-Plane'y, pamiętając o tym, że: 0=%00, 1=%01, 
2=%10, 3=%11. W rezultacie otrzymujemy: 


Bit-Plane O Bit-Plane 1 

1111111111111111 Q000000000000000 
1100000000000011 0011111111111100 
1100111111110011 0011111111111100 
1100110000110011 0011110000111100 
1100110000110011 0011110000111100 
1100111111110011 0011111111111100 
1100000000000011 0011111111111100 
1111111111111111 Q000000000000000 





Przepisując teraz liniami poziomymi na przemian 
dane dla dwóch Bit-Plane'ów otrzymamy gotowe infor- 
macje dla kształtu SPRITE'a. W naszym przykładzie 
będą one przedstawiały się następująco: 


dc.l %1111111111111111,  %0000000000000000 
de.l %1100000000000011, %0011111111111100 
de.l %1100111111110011, %0011111111111100 
dc.l %1100110000110011, %0011110000111100 
dc.l %1100110000110011, %0011110000111100 
dc.l %1100111111110011, %0011111111111100 
dc.l %1100000000000011, %0011111111111100 
dc.l %1111111111111111, %O0000000000000000 


Jeśli komuś wydaje się zbyt żmudne przepisywanie 
liczb binarnych, może zamienić je hexadecymalnymi. 
Dane przgotowanew ten sposób mogą być bezpośrednio 
wykorzystane w strukturze podawanej komputerowi. 


Krzysztof "K.K." Kobus 


Księgarnia ELEKTRONIKA 
R. Wójcik i S-ka 


„SERKA. 


00-542 WARSZAWA ul. Mokotowska 51/53 
tel./fax (022) 628-16-14 


POLECA W CIĄGŁEJ SPRZEDAŻY 
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Dzisiaj, na początek nowa garść rozkazów, a poiem 
krótki program. 

Tym razem będzie to procedura służąca do sporzą- 
dzania tablic adresów font NOP "No Operation" - nie rób 
nic. 

Po napotkaniu tej instrukcji mikroprocesor nie 
wykonuje żadnego działania. Laikom mogłoby się 
wydawać, że instrukcja ta jest zupełnie niepotrzebna 
-przecież ona nic nie robi, a jednak jest przydatna i może 
być używana na wiele różnych sposobów. 

Hackerzy zastępują rozkazy zmniejszania zawartości 
komórki zawierającej iłość „żyć” w grach instrukcjami 
NOP, tym samym uzyskując nieśmiertelność. Przy 
uruchamianiu programów można tą instrukcją zastąpić 
niektóre rozkazy, (np. skok do podprogramu), aby 
zobaczyć jak w takiej sytuacji zachowa się nasz program. 
Wreszcie może być wprowadzona do programu w celu 
uzyskania niewielkich opóźnień. 

Znaczniki: nie są modyfikowane. 

Przykład: NOP 

DBxx Dxykieta "Test Condition, Decrement And 
Branch" - testuj warunek zmniejsz i skocz. 

Za pomocą instrukcji DBxx możemy w łatwy sposób 
organizować pętle. W tym celu należy wybrać jeden z 
re jestrów danych, który spełni zadanie licznika, po czym 
zainicjować go odpowiednią wartością. Następnie 
początek pętli oznaczymy dowolną etykietą (np. 
„Loop”), a na jej końcu umieścimy jedną z instrukcji 
DBxx. Mikroprocesor po napotkaniu tejże komendy 
sprawdzi określone warunki (zależnie od „xx”) i jeżeli 
będą one spełnione, zakończy wykonywanie pętli, 
przechodząc do następnego rozkazu. Jeżeli natomiast 
dany warunek nie będzie spełniony, mikroprocesor 
zmniejszy o 1 zawartość wybranego rejestru danych, 
czyli naszego licznika i przejdzie do etykiety, o ile licznik 
nie osiągnie wartości -1. W tym ostatnim przypadku 
pętla zostanie przerwana. Należy pamiętać, że rozkazy 
DBxx operują jedynie na młodszych 16-bitach rejestrów, 
czyli na młodszym słowie. Przy organizowaniu pętli 
proponuję korzystać zwyższych rejestrów danych tzn. dó 
lub d7, ponieważ są one rzadziej używane, a to pozwoli 
uniknąć błędów. Przedstawię teraz pokrótce wszystkie 


instrukcje DBxx. 

DBCS :pętla zostanie zakończona jeśli C=1 
DBCC :pętla zostanie zakończona jeśli C=0 
DBEQ :pętla zostanie zakończona jeśli Z=1 
DBNE :pętla zostanie zakończona — jeśli Z=0 
DBMi :pętla zostanie _ zakończona jeśli N=1 
DBPL :pętla zostanie zakończona jeśli N=0 
DBVS :pętla zostanie _ zakończona jeśli V=1 
DBVC :pętla zostanie zakończona jeśli V=0 
DBGE :zakończenie, gdy [N=0 i V=O], lub [N=1 i V=1] 


DBGT :zakończenie, gdy [N=1 i V=1 i Z=0], lub [N=0 i 
V=0 i Z=0] 


DBHI :zakończenie, gdy C=0 i Z=0 
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:zakończenie, gdy [2=1] iub [N=1 i V=0] lub 
;[N=0 i V=1] 


DBLS :zakończenie, gdy C=1 albo Z=1 

DBLT :zakończenie, gdy [N=1 i V=0] iub [N=0 i V=1] 

DBRA :nie testuje żadnych znaczników; pętla może być 
;zakończona jedynie przez licznik. Mnemonik DBRA 
,używany jest zamiennie z DBF. 

DBT  :pętla nie zostanie powtórzona ani razu. 


Niezapominajmy, że w każdym zwyżej wymienionych 
przypadków pętla może być również zakończona, gdy 
licznik osiągnie wartość -1. 

Znaczniki: nie są modyfikowane. 

Przykład: 
move.w  7$13,d7 
move.b  (a0)+,(a1)+ 
dbeq d7,loop 

Wykonanie tych instrukcji da nam następujący rezuł- 
tat: 

bajty będą przepisywane spod adresu wskazywanego 
przez a0, pod adres wskazywany przez a1. 

Jeżeli jeden z nich będzie równy O, pętla zostanie przer- 
wana. 

W przypadku, gdy wszystkie będą różne od 0, petla 
zosianie powtórzona $14 razy, gdy $13-$14=-1. 

OR adres efektywny,Dx „Inclusive OR Logical” - 
Logiczna suma Dx,adres efektywny. 

Instrukcja OR wykonuje logiczną sumę dwóch 
operandów zostawiając wynik w operandzie przezna- 
czenia. Sumą logiczną nazywamy funkcję, która przyj- 
muje wartość 1, jeżeli przynajmniej jeden zargumentów 
jest równy 1. Możliwe przypadki ilustruje tabelka: 


loop: 


Olub0=0 
Olub1=1 
1llub0=41 
1lub1l=1 


Instrukcji tej używamy, gdy chcemy ustawić w ope- 
randzie określone bity. Operować możemy na bajtach, 
słowach i długich słowach. 

Znaczniki: X - bez zmian 
N - ustawiany zgodnie z najstarszym bitem 
„wyniku 
Z - ustawiany, gdy wynik jest równy zero 
V - zawsze zerowany 
C - zawsze zerowany 


Przykład: 
move.b  4%01110100,d0 
move.b  4%11000010,d1 
or.b do,d1 


W wyniku otrzymamy wartość %11110110 
umieszczoną w rejestrze d1. 

ORI źłliczba,adres efektywny „Incłusive OR 
Immedjate” - natychmiastowe OR. 

Instrukcja ta wykonuje logiczną sumę natychmias- 
towego operandu źródłowego z operandem przezna- 
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czenia określonym adresem efektywnym. Możliwe jest 
wykonanie ORI z rejestrem statusu mikroprocesora, co 
pozwola programiście na dowolne ustawienie 
znaczników. Rozmiarem tej operacji może być bajt, 
słowo lub długie słowo. 

Znaczniki: analogicznie jak OR. 

W przypadku wykonania ORI z rejestrem stanu 
znaczniki zostaną ustawione zgodnie z operandem 
źródłowym. 


Przykład: 
ori.b 4$23,d0 - wykona iogiczne or z bajtem 
„rejestru dO. 
EXG Rx,Ry "Exchange Registers" - zamiana 
rejestrów. 
Instrukcja EXG służy do zamiany dwóch rejestrów. 
Możliwe są trzy przypadki: 


-zostaną zamienione zawartości rejestrów danych 

-zostaną zamienione zawartości rejestrów 
adresowych 

-zamiana rejestru danych z adresowym. 

Zawsze zamieniane są wszystkie 32-bity - nie można 
zamienić np. tylko młodszych słów rejestrów. 

Znaczniki: nie są modyfikowane. 

Przykład: 

exg a0,d5 - wymieni zawartość rejestrua0 z d5. 

NOT adres efektywny „Logical Complement” - 
dopełnienie logiczne. 

Instrukcja ta neguje operand określony adresem 
efektywnym. Stan wszystkich bitów zmieni się na 
przeciwny. Logiczne NOT można wykonywać na 
operandzie wielkości bajtu, słowa lub długiego słowa. 

Znaczniki: X - nie zmieniany 

N - ustawiany, gdy wynik jest ujemny 
Z - ustawiany, gdy wynikiem jest O 

V - zawsze zerowany 

C - zawsze zerowany. 


Przykład: 
move.b  4%11100011,d1 
not.b dl. 


W wyniku działania tych rozkazów otrzymamy liczbę 
%00011100, umieszczoną w rejestrze d 1. 

Jak już wspomniałem na wstępie, procedura, którą 
dzisiaj przedstawię służy do sporządzania tablic adresów 
fontów lub elementów grafiki. Jeżeli komuś wydaje się 
to niezrozumiałe, proszę o rozpatrzenie poniższego 
przykładu. 

Załóżmy, że piszemy grę „komnatową” - musimy, 
więc na jednym dysku zmieścić ogromną ilość grafiki. 
Aby to umożliwić stosuje się następującą metodę: grafik 
nie rysuje całych komnat, tylko małe ich fragmenty (o sta- 
łych wymiarach np: 16x16). Następnie programista 
z tych małych klocków składa, na podstawie wcześniej 
ustalonych tablic, całe komnaty. Pozwala to na ogromne 
zaoszczędzenie pamięci, gdy jeden klocek może wielo- 
krotnie występować w danej komnacie. Podobnie 
postępują koderzy. Aby zaoszczędzić czas, nie obliczają 
za każdym razem pozycji fonta w zestawie, lecz pobierają 
ich adresy z tablicy sporządzonej przy pomocy procedur 
podobnych do powyższej. 

Myślę, że znajdzie ona szerokie zastosowanie, a na 
pewno warto ją przeanalizować ze względów trenin- 


2, (AU POOÓB 


gowych. Dodam jeszcze, iż była to pierwsza procedura, 
jaką napisałem w asemblerze 68000. 

Zapoznajcie się z jej działaniem i spróbujcie ją 
napisać od nowa lub przynajmniej zoptymalizować. 


fonts =$6000 ;adres pierwszego fonta w zestawie 
ba =10 ;iiość fontów w iinii 
Vx: =4 „szerokość fonta w bajtach 
WA =32 ;wysokość  fonta 
li: =5 iliczba fontów w zestawie. 
Start: 
clr.l d2 
lea Tab(pc),a5 
move.l 4łFonts,d3 
move.b  7ll,d7 
bsr Wstaw 
move.b  41,d6 
Loop: addi.l 4łvx,d3 
subq.b  41,d7 
beq End 
addq.b  41,d6 
bsr Wstaw 
cmp.b łbGd6 
bne Loop 
clr.l do 
cir.b d6 
move.b  ś[vy-1],d0 
mułu źbo*vx,dO 
add.l d0,d3 
bra Loop 
End: rts 
Wstaw:move.l d3,(a5) + 
rts 
Tab:  bik.i 51,0 ;bufor na adresy fontów. 


Krzysztof "K.K." Kobus 


Zapraszamy wszystkich do udziału 
w stałym konkursie pod hasłem: 


Najlepszy program miesiąca 





W konkursie udział mogą brać wszyscy, którzy nadeślą 
własne, nigdzie nie publikowane prace. 
Tematyka programów dowolna. 

Konkurs rozgrywany jest osobno dla komputerów C-64 

| i Amiga. 
Teksty programów należy nadsyłać na adres redakcji 

na dyskietce łub w postaci 
czytelnego rękopisu 
(dyskietki będą przez redakcję zwracane). 
Objętość programu wraz z opisem i komentarzem 

nie powinna przekraczać 4 stron maszynopisu. 
Raz w miesiącu Sąd Konkursowy wybierze najlepsze 
programy przyznając ich autorom dwie główne nagrody 


po 500.000 zł każda. Decyzje Sądu 


Konkursowego są nieodwołalne. Oprócz zdobycia 
głównej nagrody autorzy mają szansę na publikację 
swych prac na łamach naszego pisma. 

Pracę prosimy podpisywać imieniem i nazwisklem oraz 

adresem autora. 


... . 
uurmauliy ii 


Redakcja 
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Często pisząc jakiś program, który będzie się ko- 
munikował z dyskiem, napotykamy na problem ele- 
ganckiego, przyjemnego dla użytkownika, a jednocześnie 
funkcjonalnego wybierania zbioru z katalogu dysku. Wiele 
programów (np. Cygnus Edytor v1.0 czy Power Packer) ma 
swoje własne programy obsługi katalogu dysku, jednak są 
to dosyć długie i raczej skomplikowane procedury. Cóż 
więc należy uczynić, aby nasz (najczęściej krótki) pro- 
gram nie wydłużył się na „pół” pamięci, oraz żeby 
zaoszczędzić sobie pracy? Myślało już o tym wielu 
programistów i... stworzyli bardzo dobre „wybieraczki” 
(file requestery), które są umieszczone w popułarnych 
bibliotekach - ARP i REQ. Biblioteki arp.library (Amiga 
Replacement Project) i req.library (Requesters) są 
dostępne na wielu dyskach (np. „64+4 Public Domain”). 

Requestery te były używane w bardzo wielu progra- 
mach, a oto niektóre przykłady: 

Requester A:p: 

- _ Resource 

- ShowPic 

- MasterSeka v1.80 - opcjonalnie 

- PPShow 1.1 

- PPMore 1.7 

Requester Req: 

- CED Vv2 

- Noise Player v3.0 

- MasterSeka v1.80 - opcjonalnie 

Co należy uczynić, aby wykorzystać requester? Po 
pierwsze musimy posiadać daną bibliotekę na dysku, na 
którym pracujemy. Następnie musimy tą bibliotekę 
otworzyć i obsłużyć requester, a potem pobrać wybraną 
nazwę i robić z nią co tylko dusza zapragnie. 

Zacznijmy więc od requestera z biblioteki arp. 

Najpierw musimy się upewnić, że posiadamy bi- 
bliotekę arp.library na dysku, otwieramy ją i gdy chcemy 
wybrać jakiś zbiór, wykorzystujemy procedurę: File- 
Request, która pobierze, i jako wynik da nam nazwę 
zbioru wybranego przez użytkownika. 


Procedura:  FileRequest _ (arp.library) 
Skok: -294 
Wejście: AO - adres struktury FileRequester 
Wyjście: DO - wskaźnik nazwy zbioru w strukturze 
FileRequester, lub jeśli DO = O to wybrano 
opcję „Canceł” 
Struktura FileRequester 
CPTR _ (dc.l) FR Hail adres nazwy okna 
CPTR (del) FR File adres obszaru 
przeznaczonego na nazwę 
zbioru 
"CPTR  (de.) FR Dir adres obszaru 
przeznaczonego na nazwę 
katalogu 
CPTR (del) FR_Window przyporządkowanie 


requestera dla danego okna 
łub O jeżeli dla Workbencha 
UBYTE (dc.b) FR_FuncFlags 
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UBYTE  (de.b) 


FR_reservedl zarezerwowany (należy 


ustawić na O) 


APTR  (dc.l) FR Function adres procedury 
wywoływanej dla 
WildCards'ów 

LONG  (dc.l) FR reserved2 zarezerwowany (należy 


ustawić na 0). 

Tak wygląda struktura FileRequesier, a teraz po kolei 
o każdym z parametrów. 

FR_Hail jest to adres nazwy okna, np. 

Nazwa dc.b „Load File” 0; koniecznie musi kończyć 
się zerem. 

FR_File - pod tym adresem będzie umieszczana 
nazwa wybranego zbioru przez użytkownika. Obszar ten 
powinien mieć długość 33 bajtów. 

FR_Dir- pod tym adresem będzie umieszczana nazwa 
katalogu, z którego wybieramy dany zbiór. Obszar ten 
powinien mieć długość 34 bajtów. 

FR_Function - adres procedury obsługującej np. 
ukrywanie niektórych zbiorów (np. .info). Gdy zostanie 
wykonany skok do tej procedury, to w DO otrzymujemy 
maskę znacznika (FR_FuncFlags), dla którego została 
wywołana ta funkcja, a w AO wskaźnik obiektu 
przyporządkowanego temu znacznikowi. Maska 
znacznika nie jest numerem bitu danego znacznika, ale 
wartością FR_FuncFlags dla tego znacznika. Rejestr 
adresowy Ań jest taki sam jak przed wejściem do proce- 
dury FileRequest, ale rejestr A6 nie musi wcale zawierać 
adresu biblioteki arp (tzw. ArpBase). Nasza procedura 
może dowolnie używać rejestrów AO, A1, DO, D1 oraz 
A4, natomiast pozostałe rejestry musimy przechować 
(łącznie z A6). Przy wyjściu dla niektórych znaczników 
wymagana jest maska w DO. 

FR_FuncFlags - znaczniki sterujące wywołaniem 
procedury FR_Fuction. Jeżeli dany bit jest ustawiony to 
procedura zostanie wywołana z maską tego z danymi 
dotyczącymi danego bitu. 

A teraz po kolei: 

FRB_DoWildFunc bit 7. 

W AD otrzymujemy FilelnfoBlock (patrz Examine - 
dos.library) i jeżeli chcemy, aby ta nazwa została dodana 
do listy nazw w oknie requestera, to w DO zwracamy 
0, jeżeli zwrócimy wartość różną Od zera, to zbiór zo- 
stanie pominięty. 

FRB_DoMsgFunc bit 6. 

W AD otrzymujemy wskaźnik IntuiMessage dła 
danego okna, z którego został wywołany requester. 
Możemy teraz wpływać na IntuiMessage, dotyczące 
okna i gadżetów mu przyporządkowanych. Wartość 
w DO jest ignorowana. 

FRB_DoColor bit 5. 

Funkcja nie jest wywoływana, ałe gdy ten bit jest 
ustawiony, kolor iła dla requestera jest inny dzięki 
czemu możemy mieć dwa różne requestery, np. jeden dla 
funkcji load, a drugi dla funkcji save. 
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FRB_NewIDCMP bit 4. 

Używany tylko, gdy requester jest wywoływany z da- 
nego okna (FR_Window 0) wtedy requester pobierze 
znaczniki IDCMP z portu tego okna. Procedura nie jest 
wywoływana. 

FRB_NewWindFunc bit 3. 

W AO otrzymujemy adres struktury NewWindow dla 
requestera, dzięki czemu możemy zmodyfikować 
wymiary oraz pozycję jego okna. Wartość w DO jest 
ignorowana. 

FRB_AddGadFunc bit 2. 

W AQ otrzymujemy adres struktury Window dla re- 
questera po tym, jak dodał wszystkie swoje gadżety, ale 
ich jeszcze nie wyrysował. Możemy w ten sposób dodać 
własne gadżety do okna requestera. Wartość w DQ jest 
ignorowana. 

FRB_GEventFunc bit 1. 

Procedura zostanie wywołana gdy, któryś z gadżetów 
użytkownika zostanie wybrany. W AO otrzymujemy 
gadżet ID dia gadżetu wybranego przez użytkownika. 
Jeżeli w DO zwrócimy 0 FileRequest nie zarcaguje 
i będzie kontynuował, w przeciwnym wypadku zakończy 
działanie i wróci do głównego programu. 

FRB_ListFunc bit 0. 

Jeszcze nie został wykorzystany przez autorów 


arp.library. 
A teraz krótki przykład wykorzystania requestera 
Arp. 
Exec: = 4 
OldOpenLlbrary: = - 408 
FlieRequest: kd - 294 
move.l Exec,a6 
lea ArpName,ai 
jsr OłdOpenLibrary (a6) 
move.l DO,ArpBase 
move.l ArpBiase,a6 
lea FileRequester,a0 
jsr FileRequest(a6) 
tst.i do 
beq.s Error 
tu procedura wykorzystania nazwy 
rts 
Error: „procedura obsługi błędu (użytkownik 
;wybrał opcję CANCEL w  requesterze) 
rts 
ArpBase: 
dc.l o 
FileRequester: 
dc.l Name 
dc.l FileMem 
dc.l DirMem 
dc. o ;nie dołączamy do 
;żadnego okna 
ćc.b o 
dc.b 0 
dc.l 0 „nie korzystamy 
;z żadnej procedury 
dc.l 0 
ArpName: 
dc.b "arp.library",O 
Name: dc.b "Load File',0 
FileMem: 
bik.b 33,0 
DirMem: 
bik.b 34,0 


Tak wygląda obsługa File Requestera z biblioteki arp, 
a teraz przejdźmy do „wybieraczki” z biblioteki req. 
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File Requester umieszczony w tej bibliotece jest wy- 
godniejszy i posiada o wiele więcej funkcji niż ten 


z arp. 
Procedura:  FileRequester (req.library) Skok: - 84 
Wejście: AO - adres struktury FileRequester 
Wyjście: DO - jeżeli DO = © wybrano opcję Cancel 


w przeciwnym wypadku wybrano ztsiór 

Struktura FileRequester 

UWORDd(dcew )VersionNumber ustawiamy na O. 

CPTR(dc.l)Title wskaźnik nazwy okna. 

CPTR (dc.l) Dir adres obszaru przeznaczonego na 
nazwę katałogu obszar ten musi mieć długość 131 baj- 
tów. 

CPTR (dc.l) File adres obszaru przeznaczonego na 
nazwę zbioru, obszar ten musi mieć długość 31 bajtów. 

CPTR (dc.l) PathName adres obszaru przezna- 
czonego na kompletną nazwę wybranego zbioru tj. 
katalog+-zbiór, a jego długość musi wynosić 162 bajty. 

CPTR (dc.l) Window adres struktury Window - 
podporządkowanie requestera do danego okna (jeżeli O, 
to okno na Ścreen'ie Workbencha). 

UWORD (dc.w) MaxExtendSelect maksymalna 
liczba zbiorów, które możemy wybrać jeżeli jesteśmy 
w trybie wybierania kilku zbiorów na raz (ustawiony 
znacznik FRQEXTSELECT) - 0 oznacza maksy- 
malną liczbę zbiorów (65535). 

UWORD (dc.w) NumLines iłość linii (zbiorów) 
wyświetlanych w oknie Requestera. 

UWORD (dc.w) NumColumns ilość kolumn 
(szerokość) w oknie wybierania zbiorów 

UWORD (dc.w) DevColumns szerokość okna, 
w kżórym są wyświetlane dostępne katalogi. 

ULONG (dc.1) Flags znaczniki dla FileRequestera. 

UWORD (dc.w) DirNamesColor znaczniki kolorów 
(wartości 1,2,3,...) jeżeli chcemy kolor O, musimy wybrać 
wartość większą niż 32, 0 oznacza kolor narzucony przez 
req. 
UWOBD (dc.w) FileNamesColor. 

UWORD (dc.w) DeviceNamesColor. 

UWORD (dcw) FontNamesColor. 

UWOBD (dc.w) FontSizesColor. 

UWORD (dc.w) DetailColor jeżeli te dwa kołory są 
ustawione na O to 

UWORD (dc.w) BlockColor będzie ustawiony 
kolor1 

UWORD (dc.w) GadżetTextColor kolor pięciu 
gadżetów FileRequesiera 

UWORD (óc.w) TextMessageColor kolor 
komunikatu 

UWORD (dc.w) StringNameColor kolor słów: 
Drawer,File,Hide,;Show 

UWORD (dc.w) StringGadgetColor Kolor ramek od 
gadżetów 

UWORD (dc.w) BoxBorderColor kolor ramek 
wokół zbiorów 

UWORD (dc.w) GadgetBoxColor kolor ramek 
wokół pięciu gadżetów 

UWORD (blk.w) FRU_Stuff[18] 34 bajty zarezer- 
wowane powinny być wyzerowane 

STRCT (blk.b) DateStamp[14] kopia daty pobranej 
z katalogu (14 bajtów) 

UWORD (dc.w) WindowLefiEdge 

UWORD (dc.w) WindowTopEdge 
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te dwa pola wskazują położenie górnego lewego rogu 
okna requestera pod warunkiem, że jest ustawiony 
znacznik FRQABSOLUTEXY 

UWORD (dc.w) FontYSize 

UWOBD (dc.w) FontStyle 

w tych dwóch połach otrzymujemy wartości odnośnie 
fontów, jakie wybraliśmy pod warunkiem, że 
ustawiliśmy bit selekcji fontów FRQGETFONTS 

APTR (dc.l) ESStructure jeżeli ustawiliśmy bit 
FRQEXTSELECT to w tym miejscu znajduje się 
wskaźnik do struktury ExtendedSelect (jeżeli 
użytkownik wybrał kilka zbiorów) 

CHAR (bik.b) Hide[32] 32 bajty na maskę dla 
zbiorów, które będą ukrywane w katalogu 

CHAR (blk.b) Show[32] 32 bajty na maskę dla 
zbiorów, które będą pokazywane w katalogu 

WORD (dc.w) FileRufferPos 

WORD (dc.w) FileDispPos 

WORD (dc.w) DirBufferPoste 

WORD (dc.w)  DirDispPos FileRequestera 

WORD (dc.w) HideBufferPos 

WOBD (dc.w) HideDispPos 

WORD (dc.w) ShowBufferPos 

WORD (dc.w) ShowDispPos 

powyższe pola są pobrane z różnych gadżetów i wska- 
zują pozycję kursora w tych gadżetach dzięki czemu przy 
kolejnych wywołaniach kursor będzie się znajdować 
w pozycji w jakiej go pozostawiliśmy ostatnio. 

Kolejne pola są tylko do użytku wewnętrznego przez 
FileRequester!!! Nie należy ich modyfikować, gdy mogą 
z tego wyniknąć nieprzewidziane konsekwencje!!! 

APTR (dc.l) Memory wskaźnik przestrzeni 
zaalokowanej na katalog. 

ĄAPTR (dc.l) Memory2 wskaźnik pamięci użytej na 
zbiory ukrywane 

APTR (de.l) Lock 

char (bik.b) PrivateDirBuffer[132] bufor zarezer- 
wowany na przechowanie nazwy katalogu 

ĄAPTR (dcl) FilelnfoBiock 

WORD (dc.w) NumEntries 

WORD (dc.w) NumHiddenEntries WORD (dc.w) 
FileStartiNumber 

WORD (dc.w) DeviceStartNumber 

Tak wygląda kompletna struktura File Requester. 
Teraz przedstawię opis znaczników (Flags) 

FRQSHOWINFO bit 0 

Jeżeli ten znacznik jest ustawiony, to zbiory .info 
(Ikonki) będą pokazywane w katalogu. W przeciwnym 
przypadku zbiory te będą ukrywane. 

FRQEXTSELECT bit 1 

Jeżeli ten znacznik jest ustawiony, to użytkownik jest 
w trybie Extended, czyli może wybrać kilka zbiorów, 
a od naszego programu będzie zależało w jaki sposób 
zostanie to wykorzystane. W przeciwnym wypadku 
możemy wybrać tylko jeden zbiór. 

FRQCACHING bit 2 

W przypadku gdy ustawimy ten bit, FileRequester 
będzie rezerwował pamięć na katalog dysku i gdy 
uruchomimy go po raz kolejny, ten katalog będzie już 
wczytany i nie będzie musiał być za każdym razem 
wczytywany, gdy tylko wywołamy FileRequestera. 

FRQGETFONTS bit 3 
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Jeżeli ustawimy ten bit, otrzymamy zupełnie inne 
okno FileRequestera służące do wybierania fontów 
(czcionek). 

FRQINFOGADGET bit 4 

Jeżeli ustawimy ten znacznik, to w prawym górnym 
rogu okna FileRequestera będzie umieszczony gadżet 
„Hide .info files” - ukrywanie zbiorów .info. Jeżeli 
przełączymy ten gadżet za pomocą myszy na „Show .info 
files” to zbiory „info pojawią się w katalogu. 

FRQHIDEWILDS bit 5 

Ustawiając ten znacznik pozbywamy się gadżetów 
„Hide” i „Show” służących do selekcji zbiorów 
posiadanych w katalogu. Jeżeli te gadżety są umie- 
szczone w oknie FileRequestera to możemy aktywnie 
wpływać na filtrowanie plików, na przykład ustawiając 
„Show” na ,„*.s” będziemy otrzymywać w kata logu tylko 
te pliki, które posiadają dopełnienie ,„S”. 

FRQABSOLUTEXY bit 6 

Jeżeli ustawimy ten bit, to okno FileRequestera 
będzie umieszczone na konkretnych pozycjach 
pobranych ze struktury FileRequester. W przeciwnym 
przypadku jest ono centrowane w stosunku do pointera 
myszy. 

FRQCACHEPURGE bit 7 

Jeżeli ten bit jest ustawiony to katalog będzie 
usunięty z pamięci, gdy tylko zmieni się data w głównym 
katalogu. 

FRQNOHALFCACHE bit 8 

Jeżeli ten bit jest ustawiony, to katalog zostanie 
zapamiętany tylko w przypadku, gdy został cały wczytany 
do pamięci. Jeżeli wczytywanie katalogu nie zostało 
ukończone to przy każdym wywołaniu FileRequestera 
będzie ten katalog wczytywany od początku. 

FRQNOSORT bit 9 

W przypadku ustawienia tego bitu katalog nie będzie 
sortowany przy wczytywaniu do pamięci. 

FRQNODRAG bit 10 

Jeżeli ustawimy ten bit, to okno FileRequestera nie 
będzie posiadało tzw. Drag Bar'a i gadżetów głębokości, 
czyli nie będziemy mogli wpływać na położenie tego 
okna względem innych okien, ani na jego położenie na 
ekranie. 

FRQSAVING bit 11 

Ustawiamy, gdy używamy FileRequestera do 
wybrania nazwy dia zbioru, który będziemy nagrywać na 
dysk. 

FRQLOADING bit 12 

Ustawiamy, gdy używamy FileRequestera do 
wybrania nazwy dla zbioru, który będziemy ładować do 
pamięci. 

Bity FRQSAVING i FRQLOADING nie mają 
żadnego wpływu na pracę Filel equestera, i nie są do 
niczego wykorzystywane, powinny być ustawiane zgo- 
dnie z ich przeznaczeniem, gdyż może w przyszłych 
wersjach req.library znajdą zastosowanie. 

I jeszcze tylko jedna struktura: ESStructure, która 
jest wykorzystywana gdy ustawimy bit FRQEXT- 
SELECT. 


Struktura ESStructure 
APTR  (dc.l) ESStructure wskaźnik następnej struktury 
WORD  (dc.w) NameLength długość nazwy zbioru 
WORD  (dc.w) Pad tylko do wewnętrznego 
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użycia 
APTR _(dc.w) Node przez FileRequester 
CHAR  (bik.b) TheFileName[1] nazwa zbioru (zmienna). 


Jeżeli chcemy wykorzystywać tryb Extended Select, to 
musimy mieć ustawiony także bit FRQCACHING, gdyż 
wiedy FileRequester tworzy i zapamiętuje struktury Ex- 
tended Seleci. 

I na koniec, przykład wykorzystania FileRequester'a 
z biblioteki req.library (musimy być w posiadaniu tej 
biblioteki i musi być ona umieszczona na dysku, na 


którym pracujemy). 
Exec: = 4 
OldOpenLibrary: = -408 
FiłeRequester: = -84 
move.l Exec,a6 
lea ReqName,a1 
jsr OldOpenLibrary (a6) 
move.l DO,ReqBase 
move.l ReqRase,a6 
lea FlleRequest,a0 
jsr FileRequester(a6) 
tst.l do 
beq.s Error 
tu procedura wykorzystania nazwy 
rts 
Error: „procedura obsługi błędu (użytkownik 
„wybrał opcję CANCEL w  requesterze) 
rts 
ReqBase: 
dc.l 0 
FileRequest: 
dc.w 0 
dc.l Name 
dc. DirMem 
de.l FileMem 
de.l PathMem  ;wskaźnik 
;ikompletnej nazwy 
dc.l 0 
dc.w o 
dc.w O 
dc.w 0 
dc.w 0 
dc.l $14 :ustawione znaczniki 
;FRQINFOGADGET 
;J FRQCACHING 
blk.b $164-[*-FileRequest],0 
„struktura FileRequest 
;ma długość $164 
:bajtów ityle pamięci 
„musi być na nią 
;zarezerwowane 
ReqName: 
dc.b *"req.ilbrary",O 
Name: de.b "Load File',0 
FlleMem: 
bik.b 31,0 
DirMem: 
blk.b 131,0 
PathMem: 
bik.b 162,0 


Na koniec, proponuję wczytać jakiś asembler i do- 
konać kilku eksperymentów - jest to najlepsza metoda 
na zrozumienie wszystkiego, co związane z pro- 
gramowaniem, gdyż nie można być programistą 
teoretykiem! 


Marcin „Duddie” Dudar 
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Program BootX v3.50 nie należy może do 
nowości, ale gdy znalazłem go w swoim 
śmietniku programów (dyski na które nagrywam 
wszystko co się może kiedyś przydać) 
zdecydowałem, że powinien powędrować na 
pierwszy dysk z użytkami (zdarza się to bardzo 
rzadko ze wzgłędu na długa listę oczekujących i 
ze względu nato, żenieczęsto zdarza się, aby jakiś 
program opuścił Util Pack 71). 


Autorem programu BootX v3.50 jest Peter Stuer 
(znany z wielu dobrych programów ShareWare). Pro- 
gram BootX został napisany całkowicie w assemblerze, 
co go zdecydowanie skraca i przyspiesza. Służy on do 
walki z wirusami i trzeba przyznać, że jest to narzędzie 
dobre, chociaż nie można powiedzieć, że jest doskonałe. 
Rozpoznaje on ponad 110 bootblock'ów (ponad 66 
wirusów zpisujących się na bootblock'u), a takżerozpoz- 
naje i usuwa wirusy znajdujące się w zbiorach, lub 
linkujące się do innych programów. 

Za pomcą BootX'a można prowadzić wojnę z takimi 
wirusami, znajdującymi się w zbiorach, jak: IRQ, BSG9, 
Lamer Exterminator, Xeno, Buttonic, CCCP, Travell- 
ing Jack oraz Revenge. Oprócz tych ponad 110 
bootbłockw, które BootX ma w sobie, możemy także 
tworzyć dla niego bibliotekę BootBlock'w, z której to 
będą pobierane wszystkie BootBlock'i, których nie ma 
on zdefiniowanych w sobie. Za pomocą BootX'a 
możemy nagrywać bootblock'i jako zbiory i odwrotnie: 
zbiory, jako bootblock'i. Program BootX pozwała na 
zainstalowanie dowolnego wirusa, lub bootbilock'u 
znajdującego się w bibliotece. 

BootX to godny polecenia program zwłaszcza, że 
wykonuje bardzo dużo opcji, które są w takich pro- 
gramach potrzebne, a poza tym jest on wykonany €ste- 
tycznie i można go z pełną odpowiedzialnością nazwać 
user friendly. 


Marcin "Duddie" Dudar 
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PUBLIC DOMAIN PACK C-64 


Kwiecień 


Strona A 

e Digi - Organizer - program do tworzenia 
muzyki z użyciem digitalizacji dźwięku. 

Strona B 

© „ONE YEAR - RADIUS” - mega demo grupy 
RADIUS. Bardzo ładna grafika. 


Maj 
Strona A 
CRUEL SOLIDERS - demo 
DESTINATION'91 - demo 
SUCKER DJ! - demo (digi mix) 
MUSIC SEARCHER - do wycinania Ilustracji 
muzycznych z programów 
Strona B 
© MEGA DEMO „INFOSYSTEM 91" 


Czerwiec 


trona A 

FONTEDITOR 

SINDATA EDITOR 

COLOR EDITOR 

DISK - NOTER 

GWIAZDY - demo graficzne 
FILGRAEPH 2.2/BML 
NOTE TO FLI V 2.2 

AFLI - EDITOR V 1.2 
RESET - MON,8,1 

TURBO - ASS 5 

..HIGHLIFE 45 

AXEL NEWS %1 

DISK  NOTKA/PADUA 

trona B 

PSC - MAG +49'06/91 
CONSPIRE/OREGON - demo 
CONTACT  DEMO/ORE 
SHOWPIX 


wo 


o000070000000000000 


Lipiec 
Strona A 
© Mega demo „MY, OH MYI” grupy LIGHT 
Strona B 


© Game Music Composer - edytor muzyczny 
grupy GRAFFITY Węgier. 


Sierpień 
Strona A 
©  MegaDemo „Unnamed” grupy CAMELOT 
© Sound Killer - edytor muzyczny grupy TOPAZ 
© AFLI - Editor - edytor graficzny techniki A-FLi 
©  Disk-Dos obsługa komend stacji dysków 
©  Noter v2.2 grupy TOPAZ 
© |IFFL - Squeezer kompresor dyskowy 
©  Dirmaster+ - edytor do dyskietek 
e Super Copy - DOS szybki program kopiujący 
do zbiorów 
Strona B 


© Mega Demo fińskiej grupy TOPAZ - 
„Graveyard Blues" 


DLA WSZYSTKICH 














PUBLIC DOMAIN PACK AMIGA 


Kwiecień 

RUBRER VECTORS - demo 
KEFTALES - demo 

DISK MASTER V3.0 

Moduły _ muzyczne: 

- TECHNOSTYLE 2 

- GALAXY 2 

GRAFIKA - prezentujemy rysunki 
- RICK PARKS 


Maj 

VIRUS X 5.0 

VIRUS TERMINATOR 
PARADOX - demo 
STORMCHILD - demo 
Moduły muzyczne: 

- MIAMI VOICE 

- ANTI ATARI SONG 


Czerwiec 


POWER BOOT - własne menu dysku 
DISK CODING SYSTEM - program do zabez- 
pieczania dysków 

Konwerter IFF - ANSI 

AUER NATION - demo 

Moduły muzyczne 

DOCS - opis gry ELWIRA 

LAMER DEFENCE - do wykrywania 

i niszczenia wirusów 

REWENG GO OF THE LAMER - grafika w 
tryble D HAM 

























Lipiec 

Sanity - demo 

Amiga - Tanx (1Mb) - gra 

Little Beau (1MB) - gra 

There is A Light/Tonid - modules 


Spis treści zestawów z poprzednich miesięcy - patrz 
wcześniejsze numery naszego pisma. 


Zestawy „64 plus 4 PUBLIC DOMAIN PACK" można 
zamawiać wpłacając na konto: Bank PKO SA Oddział 
w Bydgoszczy konto nr:5.09011-400522.7-136-11- 
111.0 następujących kwot: 20.000zł za pojedyńczy 
zestaw dla C-64, 25.000zł za zestaw dla AMIGI. Kwoty 
te obejmują koszt dyskietki, koszty kopiowania, 
opakowania I przesyłki pocztowej. Blankiety wpłat 
powinny być CZYTELNIE wypełnione i zawierać: Imię 
l nazwisko, dokładny adres zamawiającego, skrót 
„PDP-64"(jeśli zamawiamy zestaw dla C-64) lyb 
„PDP-A”(zestaw dla Amigi) - dane te prosimy 
umieszczać na wszystkich odcinkach dowodu 
wpłaty. W prenumeracie zestawy kosztują: PDP-64 - 
18.000zł (12 numerów 216tys zł), PDP-A - 22.000zł (12 
numerów 264tys zł). Prenumeratę można zawrzeć w 
dowolnym terminie na okres od 3 do 12 miesięcy (do 
końca roku kalendarzowego). Prenumerata może 
obejmować miesiąca zd początku roku - tzn. 
zamawiając całorocziiz prenumeratę np. w 
pażdzierniku, w pierwszej przesyłce otrzymacie 
wszystkie poprzednie zestawy. 


ZAMÓW NIE ZWLEKAJ! 














M, 
ty 


weredcjhj prog sumy 


Tylko 50.000 zł kosztuje fantastyczny edytor muzyczny wykorzystu- 
jący ogromne możliwości dźwiękowe komputera Commodore - 64. 
Oferowany zestaw zawiera i” lub taśmę magneiofonową 
z programem VOICETRACKER V4.0, trzydzieści demonstracji 
muzycznych, oraz dokładną instrukcję. UWAGA! Wersja mag- 
netofonowa tylko 40.000zł.! 

Przedsiębiorstwo ABUK posiada wyłączność na dystrybucję tego programu. 
Wszelkie kopiowanie programu i powiełanie instrukcji jest zabronione. 
Nabywcy otrzymują rejestrowane kopie programu wraz z prawem nabywania 
nowych wersji po znacznie obniżonych cenach oraz wymiany dyskietki w razie 
uszkodzenia. Studiom komputerowym proponujemy zakup hurtowy (przy 
zakupie powyżej 10 kompłetów udzielamy 20% rabatu). 

Chcąc stać się posiadaczem programu VOICETRACKER V4.0 wystarczy 
dokonać wpłaty 50.000zł (wersja dyskowa) łub 40.000zł (taśma) na konto: 
Bank PKO SA Bydgoszcz, konto nr: 5.09011-400522.7-136-11-111.0. 

Na blankiecie prosimy czytelnie podać swoje imię, nazwisko i adres wraz 
z dopiskiem „VV4.0” uzupełnionym literką „T” - taśma lub „D” - dyskietka. 























